| Some definitions of interest. |
|
int_seg | Def {i..j } == {k: | i k < j } |
| | Thm* m,n: . {m..n } Type |
|
swap | Def swap(L;i;j) == (L o (i, j)) |
| | Thm* T:Type, L:T List, i,j: ||L||. swap(L;i;j) T List |
|
length | Def ||as|| == Case of as; nil 0 ; a.as' ||as'||+1 (recursive) |
| | Thm* A:Type, l:A List. ||l||  |
| | Thm* ||nil||  |