SYNOPSIS

PERL PROGRAM NAME:

AUTHOR: Juan Lorenzo (Perl module only)

DATE:

DESCRIPTION:

Version:

USE

NOTES

Examples

SYNOPSIS

SEISMIC UNIX NOTES SUREDUCE - convert traces to display in reduced time ",

 sureduce <stdin >stdout rv=					



 Required parameters:						

	dt=tr.dt	if not set in header, dt is mandatory	



 Optional parameters:						

	rv=8.0		reducing velocity in km/sec		",	



 Note: Useful for plotting refraction seismic data. 		

 To remove reduction, do:					

 suflip < reduceddata.su flip=3 | sureduce rv=RV > flip.su	

 suflip < flip.su flip=3 > unreduceddata.su			



 Trace header fields accessed: dt, ns, offset			

 Trace header fields modified: none				





 Author: UC Davis: Mike Begnaud  March 1995





 Trace header fields accessed: 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 flip

sub rv

sub get_max_index

max index = number of input variables -1