$SETCRAY
$ASSIGN 1603:GFEMq1603.POS FOR001
$ASSIGN 1603:GFEMq1603.POSAGAFGF FOR015
$RUN GFAGAFGF
$ASSIGN 1603:GFEMq1603.ALL FOR001
$ASSIGN 1603:GFEMq1603.ALLAGAFGF FOR015
$RUN GFAGAFGF