SYNOPSIS

PERL PROGRAM NAME:

AUTHOR: Juan Lorenzo (Perl module only)

DATE:

DESCRIPTION:

Version:

USE

NOTES

Examples

SYNOPSIS

SEISMIC UNIX NOTES PSMERGE - MERGE PostScript files

psmerge in= [optional parameters] >postscriptfile			



Required Parameters:							

in=                    postscript file to merge			



Optional Parameters:							

origin=0.0,0.0         x,y origin in inches				

scale=1.0,1.0          x,y scale factors				

rotate=0.0             rotation angle in degrees			

translate=0.0,0.0      x,y translation in inches			



Notes:								

More than one set of in, origin, scale, rotate, and translate		

parameters may be specified.  Output x and y coordinates are		

determined by:							

         x = tx + (x-ox)*sx*cos(d) - (y-oy)*sy*sin(d)			

         y = ty + (x-ox)*sx*sin(d) + (y-oy)*sy*cos(d)			

where tx,ty are translate coordinates, ox,oy are origin coordinates,	

sx,sy are scale factors, and d is the rotation angle.  Note that the	

order of operations is shift (origin), scale, rotate, and translate.	



If the number of occurrences of a given parameter is less than the number

of input files, then the last occurrence of that parameter will apply to

all subsequent files.							

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 in

sub origin

sub rotate

sub scale

sub translate

sub x

sub y

sub get_max_index

max index = number of input variables -1