| Who Cites exp? |
|
exp | Def exp(m;n) == if n= 0 then 1 else m exp(m;n-1) fi (recursive) |
| | Thm* m,n: . exp(m;n)  |
|
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 |
|
bfalse | Def false == inr( ) |
| | Thm* false  |
|
btrue | Def true == inl( ) |
| | Thm* true  |
|
ifthenelse | Def if b t else f fi == InjCase(b ; t; f) |
| | Thm* b: , A:Type, p,q:A. if b p else q fi A |