$SET DEF ku6e:[kurucz.4102]
$ASSIGN GF4102.POS FOR001
$ASSIGN GF4102.POSAGAFGF FOR015
$RUN CRAY:GFAGAFGF
$!SORT/KEY=(POS:13,SIZE:12,DESC) GF4102.POSAGAFGF GF4102.POSAGAFGF
$!ASSIGN GF4102.ALL FOR001
$!ASSIGN GF4102.ALLAGAFGF FOR015
$!RUN CRAY:GFAGAFGF
$!SORT/KEY=(POS:13,SIZE:12,DESC) GF4102.ALLAGAFGF GF4102.ALLAGAFGF