| Some definitions of interest. |
|
append | Def as @ bs == Case of as; nil bs ; a.as' [a / (as' @ bs)] (recursive) |
| | Thm* T:Type, as,bs:T List. (as @ bs) T List |
|
nat | Def == {i: | 0 i } |
| | Thm* Type |
|
le | Def A B == B < A |
| | Thm* i,j: . (i j) Prop |
|
upto | Def upto(i;j) == if i < j [i / upto(i+1;j)] else nil fi (recursive) |
| | Thm* i,j: . upto(i;j) {i..j } List |