1. A : Type
2. R : AAProp
3. A
4. Trans x,y:A. R(x;y)
5. x:A. y:A. R(x;y)
6. k : 
7. 1<k
8. f : (k-1)A
9. i,j:(k-1). i<j  R(f(i);f(j))
10. y : A
11. R(f(k-2);y)
  i,j:k.
  i<j  R((z.if z<k-1 f(z) else y fi)(i);(z.if z<k-1 f(z) else y fi)(j))

1

12. i : k 13. j : k 14. i<j   R(if i<k-1 f(i) else y fi;if j<k-1 f(j) else y fi)

6 steps

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