12 lines
135 B
Text
12 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
|