1. A : Type
2. f : AAA
3. u : A
4. a : 
5. n : 
6. n1:. 
6. n1<n  (b:. bn1+a  (e:({a..b}A). (Iter(f;u) i:{a..b}. e(i))  A))
7. b : 
8. bn+a
9. e : {a..b}A
  (Iter(f;u) i:{a..b}. e(i))  A

By:	Compute CoIter(f;u) i:{a..b}. e(i) Co* Coif a<b f((Iter(f;u) i:{a..b}. e(i)),e(b-1)) else u fi THEN SplitITE Concl

1

10. a<b   f((Iter(f;u) i:{a..b-1}. e(i)),e(b-1))  A

2 steps

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