11 lines
135 B
Text
11 lines
135 B
Text
variable {A : Type}
|
|
|
|
definition id (a : A) := a
|
|
|
|
check @id
|
|
|
|
inductive list :=
|
|
nil : list,
|
|
cons : A → list → list
|
|
|
|
check @list.cons
|