$SET DEF 3801
$ASSIGN GF3801.GAM FOR008
$ASSIGN PARTFN3801.DAT FOR007
$RUN CRAY:PARTFN3007