SYNOPSIS
PERL PROGRAM NAME:
AUTHOR: Juan Lorenzo (Perl module only)
DATE:
DESCRIPTION:
Version:
USE
NOTES
Examples
SYNOPSIS
SEISMIC UNIX NOTES SUCOUNTKEY - COUNT the number of unique values for a given KEYword.
sucountkey < input.su key=[sx,gx,cdp,...]
Required parameter:
key= array of SU header keywords being counted
Optional parameters:
verbose=1 chatty, =0 just print keyword number
Example:
suplane | sucountkey key=tracl,tracr,offset
Credits: Baoniu Han, bhan@mines.edu, Nov, 2000
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 key
sub verbose
sub get_max_index
max index = number of input variables -1