$SET def 3901
$ASSIGN AB390189.DAT  FOR001
$ASSIGN GF3901.ALL FOR002
$ASSIGN GF3901.POS FOR002
$ASSIGN HYPER390189.OUT FOR005
$ASSIGN HYPER390189.ALL FOR007
$ASSIGN HYPER390189.POS FOR007
$RUN COWAN:HYPERFINE
$SORT/STABLE/KEY=(POS:1,SIZE:11)/STAT HYPER390189.POS HYPER390189.POS
$!SORT/STABLE/KEY=(POS:1,SIZE:11)/STAT HYPER390189.ALL HYPER390189.ALL