IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
rel plus implies21 1. T : Type
2. R : TTProp
3. n : 4. 0<n 5. 0<n-1 (x,y:T. (xR^n-1 y) (xRy) (z:T. (xR^+ z) & (zRy)))
6. n = 1
7. 0<n 8. x : T 9. y : T 10. xR^ny z:T. (xR^+ z) & (zRy)
By:
MoveToConcl -1 THEN RecUnfold `rel_exp` 0 THEN SplitOnConclITE THEN Reduce 0
THEN
ExRepD