24 lines
254 B
Text
24 lines
254 B
Text
|
import classical
|
||
|
|
open nat
|
||
|
|
|
||
|
|
print pp.max_depth
|
||
|
|
print +
|
||
|
|
print -
|
||
|
|
|
||
|
|
print nat
|
||
|
|
print nat.zero
|
||
|
|
print nat.add
|
||
|
|
print nat.rec
|
||
|
|
print em
|
||
|
|
print quot.lift
|
||
|
|
print nat.of_num
|
||
|
|
print nat.add.assoc
|
||
|
|
|
||
|
|
section
|
||
|
|
parameter {A : Type}
|
||
|
|
variable {a : A}
|
||
|
|
|
||
|
|
print A
|
||
|
|
print a
|
||
|
|
end
|