SYNOPSIS
PERL PROGRAM NAME:
AUTHOR: Juan Lorenzo (Perl module only)
DATE:
DESCRIPTION:
Version:
USE
NOTES
Examples
SYNOPSIS
SEISMIC UNIX NOTES SUSPIKE - make a small spike data set
suspike [optional parameters] > out_data_file
Creates a common offset su data file with up to four spikes
for impulse response studies
Optional parameters:
nt=64 number of time samples
ntr=32 number of traces
dt=0.004 time sample rate in seconds
offset=400 offset
nspk=4 number of spikes
ix1= ntr/4 trace number (from left) for spike #1
it1= nt/4 time sample to spike #1
ix2 = ntr/4 trace for spike #2
it2 = 3*nt/4 time for spike #2
ix3 = 3*ntr/4; trace for spike #3
it3 = nt/4; time for spike #3
ix4 = 3*ntr/4; trace for spike #4
it4 = 3*nt/4; time for spike #4
Credits:
CWP: Shuki Ronen, Chris Liner
Trace header fields set: ns, dt, 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 dt
sub it1
sub it2
sub it3
sub it4
sub ix1
sub ix2
sub ix3
sub ix4
sub nspk
sub nt
sub ntr
sub offset
sub get_max_index
max index = number of input variables -1