SYNOPSIS
PERL PROGRAM NAME:
AUTHOR: Juan Lorenzo (Perl module only)
DATE:
DESCRIPTION:
Version:
USE
NOTES
Examples
SYNOPSIS
SEISMIC UNIX NOTES SUIMP3D - generate inplane shot records for a point
scatterer embedded in three dimensions using
the Born integral equation ",
suimp3d [optional parameters] >stdout
Optional parameters
nshot=1 number of shots
nrec=1 number of receivers
c=5000 speed
dt=.004 sampling rate
nt=256 number of samples
x0=1000 point scatterer location
y0=0 point scatterer location
z0=1000 point scatterer location
dir=0 do not include direct arrival
=1 include direct arrival
sxmin=0 first shot location
symin=0 first shot location
szmin=0 first shot location
gxmin=0 first receiver location
gymin=0 first receiver location
gzmin=0 first receiver location
dsx=100 x-step in shot location
dsy=0 y-step in shot location
dsz=0 z-step in shot location
dgx=100 x-step in receiver location
dgy=0 y-step in receiver location
dgz=0 z-step in receiver location
Example:
suimp3d nrec=32 | sufilter | supswigp | ...
Credits:
CWP: Norm Bleistein, Jack K. Cohen
UHouston: Chris Liner 2010 (added direct arrival option)
Theory: Use the 3D Born integral equation (e.g., Geophysics,
v51, n8, p1554(7)). Use 3-D delta function for alpha.
Note: Setting a 3D offset in a single offset field beats the
hell out of us. We did _something_.
Trace header fields set: ns, dt, tracl, tracr, fldr, tracf,
sx, sy, selev, gx, gy, gelev, offset
User's notes (Juan Lorenzo) untested
CHANGES and their DATES
Import packages
instantiation of packages
Encapsulated hash of private variables
sub Step
collects switches and assembles bash instructions by adding the program name
sub note
collects switches and assembles bash instructions by adding the program name
sub clear
sub c
sub dgx
sub dgy
sub dgz
sub dir
sub dsx
sub dsy
sub dsz
sub dt
sub gxmin
sub gymin
sub gzmin
sub nrec
sub nshot
sub nt
sub sxmin
sub symin
sub szmin
sub x0
sub y0
sub z0
sub get_max_index
max index = number of input variables -1