IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
pairwise-cons211 1. T : Type
2. x : T 3. L : T List
4. P : TTProp
5. i:||[x / L]||, j:i. P([x / L][j],[x / L][i])
6. y : T 7. i : 8. i<||L||
9. y = L[i]
P(x,y)
By:
InstHyp [i+1;0] -5 THEN Reduce -1
THEN
RWO Thm*x:T, l:T List, i:||l||. [x / l][(i+1)] ~ l[i] -1