sioseis << eof
procs diskin weight geom prout gather diskoa end
diskin
   fday 068 lday 068 fgmt 0000 lgmt 0200
   set 3 6
   ipath /archive/mcs/1997/nbp9702/tape39 end
end
weight
   fno 0 lno 99999 twp 1 0 21 -1 31 3 34 0 42 0 47 0 48 3 end
end
geom
   navfil sionav type 6 rpadd 1000
   gxp 1 -265 48 -1440 dbrps 12.5 end
end
gather
   end
end
diskoa
   opath gathers.day068-0000z end
end
prout
    fno 0 lno 999999 ftr 1 ltr 1 end
end
end