2 | 20. f@0:( L[c@0]  R[c]).
increasing(f@0;L[c@0])
& ( s: L[c@0] List. ||s|| = k  ( x,y: ||s||. x < y  s[x] < s[y])  G(map(f;map(f@0;s))) = c@0) 21. c@0 ||L|| 22. c@0 = c f:( L[c@0]  n). increasing(f;L[c@0]) & ( s: L[c@0] List. ||s|| = k  ( x,y: ||s||. x < y  s[x] < s[y])  G(map(f;s)) = c@0) | 7 steps |