1. R : Id
2. in : |R|IdLnk
3. out : |R|IdLnk
4. i:|R|. 
4. R(source(in(i))) & R(destination(out(i)))
4. & source(out(i)) = i
4. & & destination(in(i)) = i
4. & & in(destination(out(i))) = out(i)
4. & & out(source(in(i))) = in(i)
5. i,j:|R|. k:. x.destination(out(x))^k(i) = j
6. i : |R|
7. k : 
8. x.destination(out(x))^k(i) = i
9. (x.destination(out(x)))  |R||R|
10. i@0 : |R|
11. i@0 = i
  y:k. (y  upto(k)) & i@0 = x.destination(out(x))^y(i)  |R|

By:	Assert (j:|R|. n:k. x.destination(out(x))^n(i) = j)

1	j:|R|. n:k. x.destination(out(x))^n(i) = j  Id	21 steps
2	12. j:|R|. n:k. x.destination(out(x))^n(i) = j  Id   y:k. (y  upto(k)) & i@0 = x.destination(out(x))^y(i)  |R|	4 steps

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