set3802
delete fort.*
assign gf3802.gam fort.8
assign partfn3802.dat fort.7
partfn