1. T : Type
2. x1 : T
3. T
4. L1 : T List
5. L2 : T List
6. f : (||L1||+1)||L2||
7. increasing(f;||L1||+1)
8. j:(||L1||+1). [x1 / L1][j] = L2[(f(j))]
  increasing(j.f(j)+1;||L1||+1)

By:	Unfold `increasing` 0 THEN Reduce 0 THEN AllHyps (j.Unfold `increasing` j THEN InstHyp [i] j)

None

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