$SET DEF 3901
$ASSIGN GF3901Z.GAM FOR008
$ASSIGN PARTFN3901Z.DAT FOR007
$RUN CRAY:PARTFN3007