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)))
7. Trans e,e':E. e <c e'
8. SWellFounded(e <c e')
9. e:E. 
9. isrcv(kind(e))
9. 
9. sends(lnk(kind(e));sender(e))[index(e)]
9. =
9. msg(lnk(kind(e));tag(kind(e));val(e))
10. e:E. isrcv(kind(e))  sender(e) <c e
11. e,e':E.
11. e <c e'
11. 
11. first(e') & e <c pred(e')  e = pred(e')
11.  isrcv(kind(e')) & e <c sender(e')  e = sender(e')
12. e:E. isrcv(kind(e))  loc(e) = destination(lnk(kind(e)))
13. e:E, l:IdLnk. loc(e) = source(l)  sends(l;e) = nil
14. e,e':E.
14. isrcv(kind(e))
14. 
14. isrcv(kind(e'))
14. 
14. lnk(kind(e)) = lnk(kind(e'))
14. 
14. (e <c e'
14. (
14. (sender(e) <c sender(e')  sender(e) = sender(e') & index(e)<index(e'))
15. m:, l:IdLnk, t:. m||snds(l;t)||  (t':. tt' & m||rcvs(l;t')||)
16. e : E
17. l : IdLnk
18. n : ||sends(l;e)||
19. t' : 
20. time(e)+1t'
21. t : 
22. <destination(l),t>  E
23. isnull(a(destination(l);t))
24. isrcv(kind(a(destination(l);t)))
25. ||snds(l;time(e))||+n+1||rcvs(l;t')||
26. lnk(kind(a(destination(l);t))) = l
27. ||rcvs(l;t)|| = ||snds(l;time(e))||+n
28. True
29. lnk(kind(a(destination(l);t))) = l
30. isrcv(kind(<destination(l),t>))
31. match(l;time(e);t)
  mu(t@0.match(lnk(kind(a(destination(l);t)));t@0;t)) = time(e)

By:	AssertBY (n:. match(lnk(kind(a(destination(l);t)));n;t)) ((HypSubst -3 0) THEN (InstConcl [time(e)])) THEN Inst Thm* f:(). (n:. f(n))  f(mu(f)) & (i:. i<mu(f)  f(i)) [t@0.match(lnk(kind(a(destination(l);t)));t@0;t)] THEN All Reduce THEN Try Trivial

1

32. n:. match(lnk(kind(a(destination(l);t)));n;t) 33. match(lnk(kind(a(destination(l);t)));mu(t@0. 33. match(lnk(kind(a(destination(l);t)));t@0;t));t) 33. & (i:.  33. & (i<mu(t@0.match(lnk(kind(a(destination(l);t)));t@0;t)) 33. & ( 33. & (match(lnk(kind(a(destination(l);t)));i;t))   mu(t@0.match(lnk(kind(a(destination(l);t)));t@0;t)) = time(e)

1 step

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