/* Rexx */

->

...

Exit

/* * */

MixSort : from 'Sort_array'