$SET def ku6e:[kurucz.4500]
$ASSIGN AB4500103.DAT  FOR001
$ASSIGN GF4500.POS FOR002
$ASSIGN HYPER4500103.OUT FOR005
$ASSIGN HYPER4500103.POS FOR007
$RUN COWAN:HYPERFINE
$SORT/STABLE/KEY=(POS:1,SIZE:11)/STAT HYPER4500103.POS HYPER4500103.POS
$ASSIGN AB4500103.DAT  FOR001
$ASSIGN GF4500.ALL FOR002
$ASSIGN HYPER4500103.OUT FOR005
$ASSIGN HYPER4500103.ALL FOR007
$RUN COWAN:HYPERFINE
$SORT/STABLE/KEY=(POS:1,SIZE:11)/STAT HYPER4500103.ALL HYPER4500103.ALL