| Who Cites nat to nat pair? |
|
nat_to_nat_pair | Def nat_to_nat_pair(i) == next_nat_pair{ i}(<0,0>) |
| | Thm* nat_to_nat_pair       |
|
next_nat_pair | Def next_nat_pair(xy) == xy/x,y. if y= 0 <0,x+1> else <x+1,y-1> fi |
| | Thm* next_nat_pair         |
|
compose_iter | Def f{ i}(x) == if i= 0 x else f(f{ i-1}(x)) fi (recursive) |
| | Thm* f:(A A), i: . f{ i} A A |
|
eq_int | Def i= j == if i=j true ; false fi |
| | Thm* i,j: . (i= j)  |