IF YOU CAN SEE THIS go to http://www.cs.cornell.edu/Info/People/sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
swap select T:Type, L:T List, i,j,x:||L||. swap(L;i;j)[x] = L[((i, j)(x))]
By:
Auto THEN Unfold `swap` 0
THEN
RWO Thm*L:T List, f:(||L||||L||), i:||L||. (L o f)[i] = L[(f(i))] 0
Generated subgoals:
None
About:
IF YOU CAN SEE THIS go to http://www.cs.cornell.edu/Info/People/sfa/Nuprl/Shared/Xindentation_hack_doc.html
T:Type, L:T List, i,j,x:
||L||. swap(L;i;j)[x] = L[((i, j)(x))]
