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

1

10. P(x,L[i])   P(x,y)

1 step

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