SYNOPSIS

PERL PROGRAM NAME:

AUTHOR: Juan Lorenzo (Perl module only)

DATE:

DESCRIPTION:

Version:

USE

NOTES

Examples

SYNOPSIS

SEISMIC UNIX NOTES SUTIVEL - SU Transversely Isotropic velocity table builder

	computes vnmo or vphase as a function of Thomsen's parameters and

	theta and optionally interpolate to constant increments in slowness



 Optional Parameters:							

 a=2500.		alpha (vertical p velocity)			

 b=1250.		beta (vertical sv velocity)			

 e=.20			epsilon (horiz p-wave anisotropy)		

 d=.10			delta (strange parameter)			

 maxangle=90.0		max angle in degrees				

 nangle=9001		number of angles to compute			

 verbose=0		set to 1 to see full listing			

 np=8001		number of slowness values to output		

 option=1		1=output vnmo(p) (result used for TI DMO)	

			option=2:output vnmo(theta) in degrees			

			option=3:output vnmo(theta) in radians			

			option=4:output vphase(p)				

			option=5:output vphase(theta) in degrees		

			option=6:output vphase(theta) in radians		

			option=7:output first derivative vphase(p)		

			option=8:output first derivative vphase(theta) in degrees

			option=9:output first derivative vphase(theta) in radians

			option=10:output second derivative vphase(p)		

			option=11:output second derivative vphase(theta) in degrees

			option=12:output second derivative vphase(theta) in radians

			option=13:( 1/vnmo(0)^2 -1/vnmo(theta)^2 )/p^2 test vs theta

			   (result should be zero for all theta for d=e)

			option=14:return vnmo(p) for weak anisotropy		

 normalize=0		=1 means scale vnmo by cosine and scale vphase by

 			    1/sqrt(1+2*e*sin(theta)*sin(theta)		

	 		   (only useful for vphase when d=e for constant

				result)					

			=0 means output vnmo or vphase unnormalized	



 Output on standard output is ascii text with:				

 line   1: number of values						

 line   2: abscissa increment (p or theta increment, always starts at zero)

 line 3-n: one value per line						







 Author: (visitor to CSM form Mobil) John E. Anderson, Spring 1994

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 a

sub b

sub d

sub e

sub maxangle

sub nangle

sub normalize

sub np

sub option

sub verbose

sub get_max_index

max index = number of input variables -1