| | Some definitions of interest. |
|
| firstn | Def firstn(n;as)
Def == Case of as; nil nil ; a.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 |
|
| le | Def A B == B<A |
| | | Thm* i,j: . (i j) Prop |
|
| lt_int | Def i< j == if i<j true ; false fi |
| | | Thm* i,j: . (i< j)  |