/* Rexx */

Sort : -rc ->        
Arg Dest : &A|L : T
    Src : A|L : <T>
    Compare : < T, T > : < 1 | -1 | 0 >

...

Return
