$SETCRAY
$ASSIGN 1804:GFEMq1804.POS FOR001
$ASSIGN 1804:GFEMq1804.POSAGAFGF FOR015
$RUN GFAGAFGF
$!ASSIGN 1804:GFEMq1804.ALL FOR001
$!ASSIGN 1804:GFEMq1804.ALLAGAFGF FOR015
$!RUN GFAGAFGF