$SET DEF KU6E:[KURUCZ.4402]
$ASSIGN GFEMQ4402.POS FOR001
$ASSIGN GFEMQ4402.POSAGAFGF FOR015
$RUN CRAY:GFAGAFGF
$!SORT/KEY=(POS:13,SIZE:12,DESC) GF4402.POSAGAFGF GF4402.POSAGAFGF
$!ASSIGN GF4402.ALL FOR001
$!ASSIGN GF4402.ALLAGAFGF FOR015
$!RUN CRAY:GFAGAFGF
$!SORT/KEY=(POS:13,SIZE:12,DESC) GF4402.ALLAGAFGF GF4402.ALLAGAFGF