SYNOPSIS
PERL PROGRAM NAME:
AUTHOR: Juan Lorenzo (Perl module only)
DATE:
DESCRIPTION:
Version:
USE
NOTES
Examples
SYNOPSIS
SEISMIC UNIX NOTES SUFLIP - flip a data set in various ways
suflip <data1 >data2 flip=1 verbose=0
Required parameters:
none
Optional parameters:
flip=1 rotational sense of flip
+1 = flip 90 deg clockwise
-1 = flip 90 deg counter-clockwise
0 = transpose data
2 = flip right-to-left
3 = flip top-to-bottom
tmpdir= if non-empty, use the value as a directory path
prefix for storing temporary files; else if
the CWP_TMPDIR environment variable is set use
its value for the path; else use tmpfile()
verbose=0 verbose = 1 echoes flip info
NOTE: tr.dt header field is lost if flip=-1,+1. It can be
reset using sushw.
EXAMPLE PROCESSING SEQUENCES:
1. suflip flip=-1 <data1 | sushw key=dt a=4000 >data2
2. suflip flip=2 <data1 | suflip flip=2 >data1_again
3. suflip tmpdir=/scratch <data1 | ...
Caveat: may fail on large files.
Credits:
CWP: Chris Liner, Jack K. Cohen, John Stockwell
Caveat:
right-left flip (flip = 2) and top-bottom flip (flip = 3)
don't require the matrix approach. We sacrificed efficiency
for uniform coding.
Trace header fields accessed: ns, dt
Trace header fields modified: ns, dt, traclCHANGES 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 flip
sub tmpdir
sub verbose
sub get_max_index
max index = number of input variables -1