| Some definitions of interest. |
|
hselect | Def select == p:'a  . @ x:'a. (p(x)) |
| | Thm* 'a:S. select (('a  hbool)  'a) |
|
bchoose | Def @ x:'a. p(x) == @x:'a. p(x) |
| | Thm* 'a:S, p:('a  ). (@ x:'a. p(x)) 'a |
|
assert | Def b == if b True else False fi |
| | Thm* b: . b Prop |
|
hequal | Def equal == x:'a. y:'a. x = y |
| | Thm* 'a:S. equal ('a  'a  hbool) |
|
hone | Def hone == Unit |
| | Thm* hone S |
|
hone_el | Def one_el ==  |
| | Thm* one_el hone |
|
ht | Def t == true |
| | Thm* t hbool |
|
tlambda | Def ( x:T. b(x))(x) == b(x) |