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. t : 
7. 0<t
8. i:Id. first(<i,t-1>)  (x:Id. (x when <i,t-1>) = (x after pred(<i,t-1>)))
9. t = 0
10. i : Id
11. isnull(a(i;t-1))
  first(<i,t-1>)
  
  (x@0:Id. (x@0 when <i,t>) = (x@0 after pred(<i,t-1>))  vartype(i;x@0))

By:	(AssertBY (first(<i,t-1>)  ) ((BackThru Thm* the_w:World, i:Id, t:. first(<i,t>)  ) (THEN (Analyze 0) THEN (InstHyp [i] 8)

1

12. first(<i,t-1>)   13. first(<i,t-1>) 14. x:Id. (x when <i,t-1>) = (x after pred(<i,t-1>))  vartype(i;x)   x@0:Id. (x@0 when <i,t>) = (x@0 after pred(<i,t-1>))  vartype(i;x@0)

3 steps

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