SYNOPSIS

PERL PROGRAM NAME:

AUTHOR: Juan Lorenzo (Perl module only)

DATE:

DESCRIPTION:

Version:

USE

NOTES

Examples

SYNOPSIS

SEISMIC UNIX NOTES SUSEHW - Set the value the Header Word denoting trace number within

	     an Ensemble defined by the value of another header word	



     susehw <stdin >stdout [options]					



 Required Parameters:							

	none								



 Optional Parameters:							

 key1=cdp	Key header word defining the ensemble			

 key2=cdpt	Key header word defining the count within the ensemble	

 a=1		starting value of the count in the ensemble		

 b=1		increment or decrement within the ensemble		



 Notes:								

 This code was written because suresstat requires cdpt to be set.	

 The computation is 							

 	val(key2) = a + b*i						



 The input data must first be sorted into constant key1 gathers.	

 Example: setting the cdpt field					", 

        susetehw < cdpgathers.su a=1 b=1 key1=cdp key2=cdpt > new.su	





 Credits:

  CWP: John Stockwell (Feb 2008) in answer to a question by Warren Franz

        based on various codes, including susplit, susshw, suchw

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 key1

sub key2

sub get_max_index

max index = number of input variables -1