$SETCRAY
$ASSIGN 3002:GFEMQ3002.POS FOR001
$ASSIGN 3002:GFEMQ3002.AGAFGF FOR015
$RUN GFAGAFGF
!$ASSIGN 3002:GFEMq3002.ALL FOR001
!$ASSIGN 3002:GFEMq3002.ALLAGAFGF FOR015
!$RUN GFAGAFGF