SYNOPSIS
PERL PROGRAM NAME:
AUTHOR: Juan Lorenzo (Perl module only)
DATE:
DESCRIPTION:
Version:
USE
NOTES
Examples
SYNOPSIS
SEISMIC UNIX NOTES SUADDSTATICS - ADD random STATICS on seismic data
suaddstatics required parameters [optional parameters] > stdout
Required parameters:
shift= the static shift will be generated
randomly in the interval [+shift,-shif] (ms)
sources= number of source locations
receivers= number of receiver locations
cmps= number of common mid point locations
maxfold= maximum fold of input data
datafile= name and COMPLETE path of the input file
Optional parameters:
dt=tr.dt time sampling interval (ms)
seed=getpid() seed for random number generator
verbose=0 =1 print useful information
Notes:
Input data should be sorted into cdp gathers.
SUADDSTATICS applies static time shifts in a surface consistent way on
seismic data sets. SUADDSTATICS writes the static time shifts in the
header field TSTAT. To perform the actual shifts the user should use
the program SUSTATIC after SUADDSTATICS. SUADDSTATICS outputs the
corrupted data set to stdout.
Header field used by SUADDSTATICS: cdp, sx, gx, tstat, dt.
Credits: CWP Wences Gouveia, 11/07/94, Colorado School of Mines
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 cmps
sub datafile
sub dt
sub maxfold
sub receivers
sub seed
sub shift
sub sources
sub verbose
sub get_max_index
max index = number of input variables -1