$SET DEF 0401
$ASSIGN 0401:GFEMQ0401.POS FOR001
$ASSIGN 0401:GFEMQ0401.POSAGAFGF FOR015
$RUN CRAY:GFAGAFGF
$sort/key=(pos:13,size:12,desc) GFEMQ0401.POSAGAFGF GFEMQ0401.POSAGAFGF
$ASSIGN 0401:GFEMQ0401.ALL FOR001
$ASSIGN 0401:GFEMQ0401.ALLAGAFGF FOR015
$RUN CRAY:GFAGAFGF
$sort/key=(pos:13,size:12,desc) GFEMQ0401.ALLAGAFGF GFEMQ0401.ALLAGAFGF