created a sort program from SHOC