| Who Cites ncompose? |
|
ncompose | Def ncompose(f;n;x) == if n= 0 then x else f(ncompose(f;n-1;x)) fi (recursive) |
| | Thm* 'a:Type, n: , x:'a, f:('a 'a). ncompose(f;n;x) 'a |
|
eq_int | Def i= j == if i=j true ; false fi |
| | Thm* i,j: . (i= j)  |
|
bif | Def bif(b; bx.x(bx); by.y(by)) == if b x(*) else y( x.x) fi |
| | Thm* A:Type, b: , x:(b A), y:(( b) A). bif(b; bx.x(bx); by.y(by)) A |