IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
change-lemma11 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. ee' 12. loc(e') = i 13. (x after e') = (x when e)
ev:E. eev & eve' & (x after ev) = (x when ev) T
By:
Assert Dec((ev[e, e'].(x after ev) = (x when ev)))