IF YOU CAN SEE THIS go to http://www.cs.cornell.edu/Info/People/sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
list-eq-set-type T:Type, P:(TProp), A,B:T List.
A = B (i:||A||. P(A[i])) A = B {x:T| P(x) } List
By:
Auto THEN AssertBY (||B|| = ||A||) (HypSubst -2 0)
THEN
AssertBY (i:||B||. P(B[i])) (RevHypSubst -3 0)