$SETCRAY
$!FOR/LIS GFAGAFGF
$!TYPE GFAGAFGF
$!LINK GFAGAFGF
$ASSIGN 3005:GFEMq3005.POS FOR001
$ASSIGN 3005:GFEMq3005.POSAGAFGF FOR015
$RUN GFAGAFGF