| 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)  |