| Some definitions of interest. |
|
comment | Def Kind of comment: $kind == a |
|
eval_factorization | Def {a..b}(f) == i:{a..b}. if(i) |
| | Thm* a,b:, f:({a..b}). {a..b}(f) |
|
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 |
|
iter_via_intseg | Def Iter(f;u) i:{a..b}. e(i)
Def == if a<b f((Iter(f;u) i:{a..b-1}. e(i)),e(b-1)) else u fi
Def (recursive) |
| | Thm* f:(AAA), u:A, a,b:, e:({a..b}A). (Iter(f;u) i:{a..b}. e(i)) A |
|
nat | Def == {i:| 0i } |
| | Thm* Type |
|
le | Def AB == B<A |
| | Thm* i,j:. (ij) Prop |
|
not | Def A == A False |
| | Thm* A:Prop. (A) Prop |
|
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} |