11 lines
292 B
Text
11 lines
292 B
Text
#exit
|
|
inductive tree.{u} (A : Type.{u}) : Type.{max u 1} :=
|
|
| node : A → forest.{u} A → tree.{u} A
|
|
with forest : Type.{max u 1} :=
|
|
| nil : forest.{u} A
|
|
| cons : tree.{u} A → forest.{u} A → forest.{u} A
|
|
|
|
#check tree.{1}
|
|
#check forest.{1}
|
|
#check tree.rec.{1 1}
|
|
#check forest.rec.{1 1}
|