1. A : Type
2. f : AAA
3. u : A
4. is_ident(A; f; u)
5. is_assoc_sep(A; f)
6. a : 
7. c : 
8. a = c
9. a<c
10. k : 
11. k1:. 
11. k1<k
11. 
11. (b:. 
11. (b-c = k1
11. (
11. ((e:({a..b}A). 
11. (((Iter(f;u) i:{a..b}. e(i))
11. ((=
11. ((f((Iter(f;u) i:{a..c}. e(i)),Iter(f;u) i:{c..b}. e(i))))
12. b : 
13. b-c = k
14. e : {a..b}A
15. b = c
  (Iter(f;u) i:{a..b}. e(i))
  =
  f((Iter(f;u) i:{a..c}. e(i)),Iter(f;u) i:{c..b}. e(i))

By:	Rewrite by Thm*  f:(AAA), u:A, a,b:, e:({a..b}A). Thm*  a<b Thm*   Thm*  (Iter(f;u) i:{a..b}. e(i)) = f((Iter(f;u) i:{a..b-1}. e(i)),e(b-1)) Using:[a:= a | b:= b]

1

f((Iter(f;u) i:{a..b-1}. e(i)),e(b-1))   =   f((Iter(f;u) i:{a..c}. e(i)),Iter(f;u) i:{c..b}. e(i))

4 steps

About: IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html