| Some definitions of interest. |
|
absval | Def |i| == if 0 i i else -i fi |
|
| Thm* x: . |x|  |
|
gcd | Def gcd(a;b) == if b= 0 a else gcd(b;a rem b) fi (recursive) |
|
| Thm* a,b: . gcd(a;b)  |
|
int_nzero | Def   == {i: | i 0 } |
|
| Thm*   Type |
|
not | Def A == A  False |
|
| Thm* A:Prop. ( A) Prop |