| Some definitions of interest. |
|
it_sum | Def it_sum(l) == if null(l) then 0 else head(l)+it_sum(tl(l)) fi (recursive) |
| | Thm* l: List. it_sum(l)  |
|
head | Def head(l) == hd(l) |
| | Thm* 'a:Type, l:'a List. mt(l)  head(l) 'a |
|
mt | Def mt(l) == Case of l; nil True ; a.as' False |
| | Thm* 'a:Type{i}, l:'a List. mt(l) Prop{1} |
|
nat | Def == {i: | 0 i } |
| | Thm* Type |
| | Thm* S |
|
not | Def A == A  False |
| | Thm* A:Prop. ( A) Prop |
|
tl | Def tl(l) == Case of l; nil nil ; h.t t |
| | Thm* A:Type, l:A List. tl(l) A List |