$SET DEF 1901 $ASSIGN GF1901.GAM FOR008 $ASSIGN PARTFN1901.DAT FOR007 $RUN CRAY:PARTFN3007