SYNOPSIS

PERL PROGRAM NAME:

AUTHOR: Juan Lorenzo (Perl module only)

DATE:

DESCRIPTION:

Version:

USE

NOTES

Examples

SYNOPSIS

SEISMIC UNIX NOTES SUMINPHASE - convert input to minimum phase

 suminphase <stdin >stdout [optional parameters]	 		



 Required parameters:					 		

	if dt is not set in header, then dt is mandatory		



 Optional parameters:							

	sign1=1		sign of first transform	(1 or -1)		

	sign2=-1	sign of second transform (-1 or 1)		

    	pnoise=1.e-9	   white noise in spectral routine		

	verbose=0		=1 for advisory messages		





 Credits:

      SEAM Project: Bruce VerWest c. 2013

 

 Trace header fields accessed: ns, dt, d1

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 pnoise

sub sign1

sub sign2

sub verbose

sub get_max_index

max index = number of input variables -1