$SET DEF 2902
$ASSIGN 2902:GFEMQ2902.POS FOR001
$ASSIGN 2902:GFEMQ2902.POSAGAFGF FOR015
$RUN CRAY:GFAGAFGF
$!SORT/KEY=(POS:13,SIZE:12,DESC) GFEMQ2902.POSAGAFGF GFEMQ2902.POSAGAFGF