| Some definitions of interest. |
|
int_seg | Def {i..j} == {k:| i k < j } |
| | Thm* m,n:. {m..n} Type |
|
int_upper | Def {i...} == {j:| ij } |
| | Thm* n:. {n...} Type |
|
nat | Def == {i:| 0i } |
| | Thm* Type |
|
split_factor1 | Def split_factor1(g; x)(u)
Def == if u=x g(x)+g(xx)+g(xx) ; u=xx 0 else g(u) fi |
| | Thm* k:{2...}, g:({2..k}), x:{2..k}.
Thm* xx<k split_factor1(g; x) {2..k} |