Nuprl - Proof: iter via intseg split pluck 1 1 1 1 1

IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At: iter via intseg split pluck 1 1 1 1 1

1. A : Type
2. f : A

A
3. u : A
4. is_ident(A; f; u)
5. is_assoc_sep(A; f)
6. a :

7. c :

8. b :

9. e : {a..b

}

A
10. a

c
11. c<b
12. (Iter(f;u) i:{a..b

}. e(i))
12. =
12. f((Iter(f;u) i:{a..c

}. e(i)),Iter(f;u) i:{c..b

}. e(i))

(Iter(f;u) i:{c..c+1

}. e(i)) = e(c)

By:	BackThru: Thm* f:(AAA), u:A. Thm* is_ident(A; f; u) Thm* Thm* (a,b:, e:({a..b}A). a+1 = b (Iter(f;u) i:{a..b}. e(i)) = e(a))

Generated subgoals:

None

About:

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