1. es : ES
2. x : Id
3. i : Id
4. T : Type
5. x,y:T. Dec(x = y)
6. vartype(i;x) r T
7. e' : E
8. e : E
9. e:E. loc(e) = i  (x when e)  T
10. e:E. loc(e) = i  (x after e)  T
11. e  e' 
12. loc(e') = i
13. (x after e') = (x when e)
  Dec((ev[e, e'].(x after ev) = (x when ev)  T))

By:	BackThru Thm* F:(AProp), L:A List. (k:A. Dec(F(k)))  Dec((kL.F(k))) THEN Analyze -1 THEN BackThruSomeHyp

None

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