1. m : 
2. 0<m
3. P:((m-1)Prop). 
3. (i:(m-1). Dec(P(i)))
3. 
3. (n,k:, f:(n(m-1)), g:(k(m-1)).
3. (increasing(f;n)
3. (& increasing(g;k)
3. (& (i:n. P(f(i)))
3. (& (j:k. P(g(j)))
3. (& (i:(m-1). (j:n. i = f(j))  (j:k. i = g(j))))
4. P : mProp
5. i:m. Dec(P(i))
6. n : 
7. k : 
8. f : n(m-1)
9. g : k(m-1)
10. increasing(f;n)
11. increasing(g;k)
12. i:n. P(f(i))
13. j:k. P(g(j))
14. i:(m-1). (j:n. i = f(j))  (j:k. i = g(j))
15. P(m-1)
16. i : (k+1-1)
  if i=k m-1 else g(i) fi<if i+1=k m-1 else g(i+1) fi

1

17. i = k 18. i+1 = k   g(i)<g(i+1)

1 step

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