| | Who Cites his pair? |
|
| his_pair | Def is_pair ==  p:'a  'b .   x:'a. y:'b. (p = (mk_pair(x,y))) |
| | | Thm*  'a,'b:S. is_pair  (('a 'b hbool) hbool) |
|
| hmk_pair | Def mk_pair == x:'a. y:'b. a:'a. b:'b. (a = x)  (b = y) |
| | | Thm* 'a,'b:S. mk_pair ('a 'b 'a 'b hbool) |
|
| bequal | Def x = y ==  (x = y T) |
| | | Thm* T:Type, x,y:T. (x = y) |
|
| bexists | Def x:T. P(x) == (x:T.  P(x)) |
| | | Thm* T:Type, P:(T). (x:T. P(x)) |
|
| tlambda | Def (x:T. b(x))(x) == b(x) |
|
| band | Def pq == if p q else false fi |
| | | Thm* p,q:. (pq) |
|
| prop_to_bool | Def P == InjCase(lem(P) ; true; false) |
| | | Thm* P:Prop. (P) |
|
| assert | Def b == if b True else False fi |
| | | Thm* b:. b Prop |
