IF YOU CAN SEE THIS go to http://www.cs.cornell.edu/Info/People/sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
swapped select T:Type, L1,L2:T List, i,j:||L1||.
L2 = swap(L1;i;j)
L2[i] = L1[j] & L2[j] = L1[i] & ||L2|| = ||L1|| & L1 = swap(L2;i;j)
& (x:||L2||. x = ix = jL2[x] = L1[x])