SYNOPSIS

PERL PROGRAM NAME:

AUTHOR: Juan Lorenzo (Perl module only)

DATE:

DESCRIPTION:

Version:

USE

NOTES

Examples

SYNOPSIS

SEISMIC UNIX NOTES SUPASTE - paste existing SU headers on existing binary data

 supaste <bare_data >segys  ns= head=headers ftn=0		



 Required parameter:						

	ns=the number of samples per trace			



 Optional parameters:						

 	head=headers	file with segy headers			

	ftn=0		Fortran flag				

			0 = unformatted data from C		

			1 = ... from Fortran			

	verbose=0	1 equals echo number of traces pasted		

 Caution:							

	An incorrect ns field will munge subsequent processing.	



 Notes:							

 This program is used when the option head=headers is used in	

 sustrip. See:   sudoc sustrip    for more details. 		



 Related programs:  sustrip, suaddhead				



 Credits:

	CWP:  Jack K. Cohen, November 1990

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 ftn

sub head

sub ns

sub verbose

sub get_max_index

max index = number of input variables -1