SYNOPSIS
PERL PROGRAM NAME:
AUTHOR: Juan Lorenzo (Perl module only)
DATE:
DESCRIPTION:
Version:
USE
NOTES
Examples
SYNOPSIS
SEISMIC UNIX NOTES SUCVS4FOWLER --compute constant velocity stacks for input to Fowler codes
Required Parameter:
ncdps= number of input cdp gathers
Optional Parameters:
vminstack=1500. minimum velocity panel in m/s to output
nvstack=180 number of stacking velocity panels to compute
( Let offmax be the maximum offset, fmax be
the maximum freq to preserve, and tmute be
the starting mute time in sec on offmax, then
the recommended value for nvstack would be
nvstack = 4 +(offmax*offmax*fmax)/(0.6*vmin*vmin*tmute)
---you may want to make do with less---)
lmute=24 length of mute taper in ms
nonhyp=1 1 if do mute at 2*offset/vhyp to avoid
non-hyperbolic moveout, 0 otherwise
vhyp=2500. velocity to use for non-hyperbolic moveout mute
lbtaper=0 length of bottom taper in ms
lstaper=0 length of side taper in traces
dtout=1.5*dt output sample rate in s,
note: typically fmax=salias*0.5/dtout
mxfold=120 maximum number of offsets/input cmp
salias=0.8 fraction of output frequencies to force within sloth
antialias limit. This controls muting by offset of
the input data prior to computing the cv stacks
for values of choose=1 or choose=2.
Required trace header words on input are ns, dt, cdp, offset.
Author: (Visitor to CSM from Mobil): John E. Anderson, Spring 1994
References:
Fowler, P., 1988, Ph.D. Thesis, Stanford University.
Anderson, J.E., Alkhalifah, T., and Tsvankin, I., 1994, Fowler
DMO and time migration for transversely isotropic media,
1994 CWP project review
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 choose
sub dtout
sub fmax
sub lbtaper
sub lmute
sub lstaper
sub mxfold
sub ncdps
sub nonhyp
sub nvstack
sub salias
sub vhyp
sub vminstack
sub get_max_index
max index = number of input variables -1