IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
iter via intseg comp binop11 1. A : Type
2. f : AAA 3. u : A 4. is_commutative_sep(A; f)
5. is_ident(A; f; u)
6. is_assoc_sep(A; f)
7. a :
b:{...a}, e,g:({a..b}A).
f((Iter(f;u) i:{a..b}. e(i)),Iter(f;u) i:{a..b}. g(i))
=
(Iter(f;u) i:{a..b}. f(e(i),g(i)))
By:
Rewrite by
Thm*f:(AAA), u:A, a,b:, e:({a..b}A).
Thm* ba (Iter(f;u) i:{a..b}. e(i)) = u