SYNOPSIS

PERL PROGRAM NAME:

AUTHOR: Juan Lorenzo (Perl module only)

DATE:

DESCRIPTION:

Version:

USE

NOTES

Examples

SYNOPSIS

SEISMIC UNIX NOTES SUSHIFT - shifted/windowed traces in time

sushift <stdin >stdout [tmin= ] [tmax= ]				



tmin=			min time to pass				

tmax=			max time to pass				

dt=                    sample rate in microseconds 			

fill=0.0               value to place in padded samples 		



(defaults for tmin and tmax are calculated from the first trace.	

verbose=		1 echos parameters to stdout			



Background :								

tmin and tmax must be given in seconds				



In the high resolution single channel seismic profiling the sample 	

interval is short, the shot rate and the number of samples are high.	

To reduce the file size the delrt time is changed during a profiling	

trip. To process and display a seismic section a constant delrt is	

needed. This program does this job.					



The SEG-Y header variable delrt (delay in ms) is a short integer.	

That's why in the example shown below delrt is rounded to 123 !	



  ... | sushift tmin=0.1234 tmax=0.2234 | ...				



The dt= and fill= options are intended for manipulating velocity	

volumes in trace format.  In particular models which were hung	

from the water bottom when created & which then need to have the	

water layer added.							







Author:



Toralf Foerster

Institut fuer Ostseeforschung Warnemuende

Sektion Marine Geologie

Seestrasse 15

D-18119 Rostock, Germany



Trace header fields accessed: ns, delrt

Trace header fields modified: ns, delrt

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 fill

sub tmax

sub tmin

sub verbose

sub get_max_index

max index = number of input variables -1