lean2/tests/lean/run/ind4.lean

23 lines
378 B
Text

section
variable A : Type
inductive list : Type :=
| nil : list
| cons : A → list → list
end
check list.{1}
check list.cons.{1}
section
variable 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}