set4602
assign gf4602.gam fort.8
assign partfn4602.dat fort.7
partfn > partfn4602.log