SIOSEIS script to GATHER all traces by common Reflection Point



sioseis << eof
procs input geom gather output end

input
#   nfskip 41
   rewind no
   iunit 0 device /dev/rmt/0cn nfiles 222
   fno 12887 lno 14100
   set 4 9
   end
end

geom
  type 2 # increment the shot loaction based on the shot number
  fs 1 ls 999999  # all shot have the same parameters (preset)
  gxp 480 -181.65   # RESET the closest group only.
  ggx -12.5         # Used to extrapolate gxp!
  dfls 37.5 dbrps 6.25 smear 6.25
  end
end

gather
   maxtrs 90 maxrps 500 end
end

output
   ounit 1 device /dev/rmt/1cn end
end

end
eof