| Some definitions of interest. |
|
firstn | Def firstn(n;as)
Def == Case of as
Def == Canil nil
Def == Caa.as' if 0< n [a / firstn(n-1;as')] else nil fi
Def (recursive) |
| | Thm* A:Type, as:A List, n: . firstn(n;as) A List |
|
map | Def map(f;as) == Case of as; nil nil ; a.as' [(f(a)) / map(f;as')]
Def (recursive) |
| | Thm* A,B:Type, f:(A B), l:A List. map(f;l) B List |
| | Thm* A,B:Type, f:(A B), l:A List . map(f;l) B List |
|
nat | Def == {i: | 0 i } |
| | Thm* Type |
|
top | Def Top == Void given Void |
| | Thm* Top Type |