| Some definitions of interest. |
|
modulus | Def a mod n == if 0 a a rem n ; ((-a) rem n)= 0 0 else n-((-a) rem n) fi |
| | Thm* a: , n: . (a mod n)  |
|
eq_int | Def i= j == if i=j true ; false fi |
| | Thm* i,j: . (i= j)  |
|
le | Def A B == B<A |
| | Thm* i,j: . (i j) Prop |
|
le_int | Def i j ==  j< i |
| | Thm* i,j: . (i j)  |
|
nat_plus | Def  == {i: | 0<i } |
| | Thm*  Type |