| Some definitions of interest. |
|
every | Def every(p;l) == if null(l) then true else (p(head(l))) every(p;tl(l)) fi
Def (recursive) |
| | Thm* 'a:Type, p:('a  ), l:'a List. every(p;l)  |
|
band | Def p q == if p q else false fi |
| | Thm* p,q: . (p q)  |
|
stype | Def S == {T:Type| x:T. True } |
| | Thm* S Type{2} |