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