SYNOPSIS

PERL PROGRAM NAME:

AUTHOR: Juan Lorenzo (Perl module only)

DATE:

DESCRIPTION:

Version:

USE

NOTES

Examples

SYNOPSIS

SEISMIC UNIX NOTES SUSPIKE - make a small spike data set

 suspike [optional parameters] > out_data_file  		



 Creates a common offset su data file with up to four spikes	

 for impulse response studies					



 Optional parameters:						

	nt=64 		number of time samples			

	ntr=32		number of traces			

 	dt=0.004 	time sample rate in seconds		

 	offset=400 	offset					

	nspk=4		number of spikes			

	ix1= ntr/4	trace number (from left) for spike #1	

	it1= nt/4 	time sample to spike #1			

	ix2 = ntr/4	trace for spike #2			

	it2 = 3*nt/4 	time for spike #2			

	ix3 = 3*ntr/4;	trace for spike #3			

	it3 = nt/4;	time for spike #3			

	ix4 = 3*ntr/4;	trace for spike #4			

	it4 = 3*nt/4;	time for spike #4			





 Credits:

	CWP: Shuki Ronen, Chris Liner



 Trace header fields set: 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 it1

sub it2

sub it3

sub it4

sub ix1

sub ix2

sub ix3

sub ix4

sub nspk

sub nt

sub ntr

sub offset

sub get_max_index

max index = number of input variables -1