lean2/tests/lean/run/ind4.lean
Leonardo de Moura bdab979e09 feat(frontends/lean): add inductive_cmd
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
2014-06-18 16:00:59 -07:00

23 lines
No EOL
374 B
Text

section
parameter A : Type
inductive list : Type :=
| nil : list
| cons : A → list → list
end
check list.{1}
check cons.{1}
section
parameter A : Type
inductive tree : Type :=
| node : A → forest → tree
with forest : Type :=
| fnil : forest
| fcons : tree → forest → forest
check tree
check forest
end
check tree.{1}
check forest.{1}