DOCUMENTATION
SYNOPSIS
PERL PROGRAM NAME: XWIGB - X WIGgle-trace plot of f(x1,x2) via Bitmap
AUTHOR: Juan Lorenzo (Perl module only)
DATE:
DESCRIPTION:
Version: USE
NOTES
Examples
SEISMIC UNIX NOTES
XWIGB - X WIGgle-trace plot of f(x1,x2) via Bitmap
xwigb n1= [optional parameters] <binaryfile
X Functionality:
Button 1 Zoom with rubberband box
Button 2 Show mouse (x1,x2) coordinates while pressed
q or Q key Quit
s key Save current mouse (x1,x2) location to file
p or P key Plot current window with pswigb (only from disk files)
a or page up keys enhance clipping by 10%
c or page down keys reduce clipping by 10%
up,down,left,right keys move zoom window by half width/height
i or +(keypad) zoom in by factor 2
o or -(keypad) zoom out by factor 2
l lock the zoom while moving the coursor
u unlock the zoom
1,2,...,9 Zoom/Move factor of the window size
Notes:
Reaching the window limits while moving within changes the zoom
factor in this direction. The use of zoom locking(l) disables it
Required Parameters:
n1 number of samples in 1st (fast) dimension
Optional Parameters:
d1=1.0 sampling interval in 1st dimension
f1=0.0 first sample in 1st dimension
n2=all number of samples in 2nd (slow) dimension
d2=1.0 sampling interval in 2nd dimension
f2=0.0 first sample in 2nd dimension
x2=f2,f2+d2,... array of sampled values in 2nd dimension
mpicks=/dev/tty file to save mouse picks in
bias=0.0 data value corresponding to location along axis 2
perc=100.0 percentile for determining clip
clip=(perc percentile) data values < bias+clip and > bias-clip are clipped
xcur=1.0 wiggle excursion in traces corresponding to clip
wt=1 =0 for no wiggle-trace; =1 for wiggle-trace
va=1 =0 for no variable-area; =1 for variable-area fill
=2 for variable area, solid/grey fill
SHADING: 2<=va<=5 va=2 light grey, va=5 black
verbose=0 =1 for info printed on stderr (0 for no info)
xbox=50 x in pixels of upper left corner of window
ybox=50 y in pixels of upper left corner of window
wbox=550 width in pixels of window
hbox=700 height in pixels of window
x1beg=x1min value at which axis 1 begins
x1end=x1max value at which axis 1 ends
d1num=0.0 numbered tic interval on axis 1 (0.0 for automatic)
f1num=x1min first numbered tic on axis 1 (used if d1num not 0.0)
n1tic=1 number of tics per numbered tic on axis 1
grid1=none grid lines on axis 1 - none, dot, dash, or solid
x2beg=x2min value at which axis 2 begins
x2end=x2max value at which axis 2 ends
d2num=0.0 numbered tic interval on axis 2 (0.0 for automatic)
f2num=x2min first numbered tic on axis 2 (used if d2num not 0.0)
n2tic=1 number of tics per numbered tic on axis 2
grid2=none grid lines on axis 2 - none, dot, dash, or solid
label2= label on axis 2
labelfont=Erg14 font name for axes labels
title= title of plot
titlefont=Rom22 font name for title
windowtitle=xwigb title on window
labelcolor=blue color for axes labels
titlecolor=red color for title
gridcolor=blue color for grid lines
style=seismic normal (axis 1 horizontal, axis 2 vertical) or
seismic (axis 1 vertical, axis 2 horizontal)
endian= =0 little endian =1 big endian
interp=0 no interpolation in display
=1 use 8 point sinc interpolation
wigclip=0 If 0, the plot box is expanded to accommodate
the larger wiggles created by xcur>1. If this
flag is non-zero, the extra-large wiggles are
are clipped at the boundary of the plot box.
plotfile=plotfile.ps filename for interactive ploting (P)
curve=curve1,curve2,... file(s) containing points to draw curve(s)
npair=n1,n2,n2,... number(s) of pairs in each file
curvecolor=color1,color2,... color(s) for curve(s)
Notes:
Xwigb will try to detect the endian value of the X-display and will
set it to the right value. If it gets obviously wrong information the
endian value will be set to the endian value of the machine that is
given at compile time as the value of CWPENDIAN defined in cwp.h
and set via the compile time flag ENDIANFLAG in Makefile.config.
The only time that you might want to change the value of the endian
variable is if you are viewing traces on a machine with a different
byte order than the machine you are creating the traces on AND if for
some reason the automaic detection of the display byte order fails.
Set endian to that of the machine you are viewing the traces on.
The interp flag is useful for making better quality wiggle trace for
making plots from screen dumps. However, this flag assumes that the
data are purely oscillatory. This option may not be appropriate for all
data sets.
The curve file is an ascii file with the points specified as x1 x2
pairs, separated by a space, one pair to a line. A "vector" of curve
files and curve colors may be specified as curvefile=file1,file2,etc.
and curvecolor=color1,color2,etc, and the number of pairs of values
in each file as npair=npair1,npair2,... .
Author: Dave Hale, Colorado School of Mines, 08/09/90
Endian stuff by:
Morten Wendell Pedersen, Aarhus University (visiting CSM, June 1995)
& John Stockwell, Colorado School of Mines, 5 June 1995
Stewart A. Levin, Mobil - Added ps print option
John Stockwell - Added optional sinc interpolation
Stewart A. Levin, Mobil - protect title, labels in pswigb call
Brian J. Zook, SwRI - Added style=normal and wigclip flag
Brian K. Macy, Phillips Petroleum, 11/27/98, added curve plotting option
Curve plotting notes:
MODIFIED: P. Michaels, Boise State Univeristy 29 December 2000
Added solid/grey color scheme for peaks/troughs
G.Klein, IFG Kiel University, 2002-09-29, added cursor scrolling and
interactive change of zoom and clipping.
IFM-GEOMAR Kiel, 2004-03-12, added zoom locking
IFM-GEOMAR Kiel, 2004-03-25, interactive plotting fixed CHANGES and their DATES
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 bias
sub clip
sub curve
sub curvecolor
sub curvefile
sub d1
sub d1num
sub d2
sub d2num
sub endian
sub f1
sub f1num
sub f2
sub f2num
sub grid1
sub grid2
sub gridcolor
sub hbox
sub interp
sub label2
sub labelcolor
sub labelfont
sub mpicks
sub n1
sub n1tic
sub n2
sub n2tic
sub npair
sub perc
sub plotfile
sub style
sub title
sub titlecolor
sub titlefont
sub va
sub verbose
sub wbox
sub wigclip
sub windowtitle
sub wt
sub x1beg
sub x1end
sub x2
sub x2beg
sub x2end
sub xbox
sub xcur
sub ybox
sub get_max_index
max index = number of input variables -1