RosettaCodeData/Task/Variadic-function/Coq/variadic-function-1.coq

5 lines
98 B
Text
Raw Permalink Normal View History

2015-11-18 06:14:39 +00:00
Fixpoint Arity (A B: Set) (n: nat): Set := match n with
|O => B
|S n' => A -> (Arity A B n')
end.