1. T : Type
2. R : TTProp
3. k : 
4. 0<k
5. x,y:T.
5. (x R^k-1 y)
5. 
5. (L:T List. 
5. (||L|| = k-1+1 & L[0] = x & last(L) = y & (i:(k-1). L[i] R L[(i+1)]))
6. k = 0
7. x : T
8. y@0 : T
9. z : T
10. x R z
11. z R^k-1 y@0
12. L : T List
13. ||L|| = k-1+1
14. L[0] = z
15. last(L) = y@0
16. i:(k-1). L[i] R L[(i+1)]
  null(L)

By:	(RW assert_pushdownC 0) THEN (RWO Thm* as:A List. as = nil  ||as||1 0)

None

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