1. the_w : World
2. FairFifo
3. e,e':E. loc(e) = loc(e')  e <c e'  e = e'  e' <c e
4. e:E. first(e)  (e':E. loc(e') = loc(e)  e' <c e)
5. e:E. 
5. first(e)
5. 
5. loc(pred(e)) = loc(e) & pred(e) <c e
5. & (e':E. loc(e') = loc(e)  (pred(e) <c e' & e' <c e))
6. e:E. first(e)  (x:Id. (x when e) = (x after pred(e)))
  Trans e,e':E. e <c e'

By:	Unfold `w-causl` 0 THEN Reduce 0 THEN BackThru Thm* R:(TTProp). Trans x,y:T. x R^+ y

None

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