IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
compose increasing1 1. k : 2. m : 3. f : km 4. g : m 5. increasing(f;k)
6. increasing(g;m)
7. i : (k-1)
g(f(i))<g(f(i+1))
By:
FwdThru Thm*k:, f:(k). increasing(f;k) (x,y:k. x<yf(x)<f(y))
[-2]
THEN
BackThru -1