| 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_factor2 | Def split_factor2(g; x; y)(u)
Def == if u=x g(x)+g(xy) ; u=y g(y)+g(xy) ; u=xy 0 else g(u) fi |
| | Thm* k:{2...}, g:({2..k}), x,y:{2..k}.
Thm* xy<k split_factor2(g; x; y) {2..k} |