SYNOPSIS
PERL PROGRAM NAME:
AUTHOR: Juan Lorenzo (Perl module only)
DATE:
DESCRIPTION:
Version:
USE
NOTES
Examples
SYNOPSIS
SEISMIC UNIX NOTES SU3DCHART - plot x-midpoints vs. y-midpoints for 3-D data
su3dchart <stdin >stdout
Optional parameters:
outpar=null name of parameter file
degree=0 =1 convert seconds of arc to degrees
The output is the (x, y) pairs of binary floats
Example:
su3dchart <segy_data outpar=pfile >plot_data
psgraph <plot_data par=pfile \\
linewidth=0 marksize=2 mark=8 | ...
rm plot_data
su3dchart <segy_data | psgraph n=1024 d1=.004 \\
linewidth=0 marksize=2 mark=8 | ...
Note: sx, etc., are declared double because float has only 7
significant numbers, that's not enough, for example,
when tr.scalco=100 and coordinates are in second of arc
and located near 30 degree latitude and 59 degree longitude
Credits:
CWP: Shuki Ronen
Toralf Foerster
Trace header fields accessed: sx, sy, gx, gy, counit, scalco.
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 degree
sub linewidth
sub n
sub outpar
sub par
sub scalco
sub get_max_index
max index = number of input variables -1