Def e  e'  == (e <loc e')  e = e'  E

is mentioned by

Thm* es:ES, x,i:Id, T:Type, c:T. Thm* (x,y:T. Dec(x = y  T)) Thm*  Thm* (vartype(i;x) r T) Thm*  Thm* (e:E. loc(e) = i  Id  first(e)  (x when e) = c  T) Thm*  Thm* (e':E.  Thm* (loc(e') = i  Id Thm* ( Thm* ((x after e') = c  T Thm* ( Thm* ((ev:E. ev  e'  & (x after ev) = (x when ev)  T))	[change-since-init]
Thm* es:ES, e':E. e:E. first(e) & e  e'	[es-first-exists]
Thm* es:ES, x,i:Id, T:Type. Thm* (x,y:T. Dec(x = y  T)) Thm*  Thm* (vartype(i;x) r T) Thm*  Thm* (e',e:E. Thm* (e  e'  Thm* ( Thm* (loc(e') = i  Id Thm* ( Thm* ((x after e') = (x when e)  T Thm* ( Thm* ((ev:E. e  ev  & ev  e'  & (x after ev) = (x when ev)  T))	[change-lemma]
Thm* es:ES, e,e',ev:E. (ev  [e, e'])  e  ev  & ev  e'	[member-es-interval]
Thm* es:ES, e,e':E. es-ble{i:l}(es;e;e')  e  e'	[assert-es-ble]

In prior sections: mb event system 2

Try larger context: EventSystems IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html