| Some definitions of interest. |
|
assert | Def b == if b True else False fi |
| | Thm* b: . b Prop |
|
hfun | Def 'a  'b == 'a 'b |
| | Thm* 'a,'b:S. ('a  'b) S |
|
hhd | Def hd == l:'a List. if null(l) then arb('a) else head(l) fi |
| | Thm* 'a:S. hd (hlist('a)  'a) |
|
hlist | Def hlist('a) == 'a List |
| | Thm* 'a:S. hlist('a) S |
|
mt | Def mt(l) == Case of l; nil True ; a.as' False |
| | Thm* 'a:Type{i}, l:'a List. mt(l) Prop{1} |
|
not | Def A == A  False |
| | Thm* A:Prop. ( A) Prop |
|
null | Def null(as) == Case of as; nil true ; a.as' false |
| | Thm* T:Type, as:T List. null(as)  |
| | Thm* null(nil)  |
|
stype | Def S == {T:Type| x:T. True } |
| | Thm* S Type{2} |