Appropriate axes and plot title may be included. Various options select the plotting format of plotting. Possible plot formats include scatter plots, connected line points with error bars shown, points with error bars, a displacement line from x axis, etc.
This subroutine may be used to plot several sets of curves. For a given set (or line) of points, the upper error bar value may be given in the next set (or line) of points. The lower error bar value may be given in the following set (or line). When the error bar option is used, the value of nl should be the number of points sets (or lines) to be plotted not including the error bar sets. This subroutine permits axis parameter flexibility and dimensioning for y array.
CALL SPLOTSX(x,y,nld,npd,nl,np,iflag,nopt,as,xl,yl,
nmx,nnx,mlx,tsx,ndx,smx,nmy,nny,mly,tsy,ndy,smy,
xt,nxt,yt,nyt,t,nt,<xm,xx,ym,yx<,ic>>)
x (R): array of x values dimensioned at least x(np)
y (R): array of y values dimensioned y(npd,nld)
npd (I): dimension of y
nld (I): dimension of y
nl (I): number of y lines to plot (see note below)
np (I): number of points per line
iflag (I): option flag
< 0 : do not close LONGLIB after plotting
= 0 : close LONGLIB--no plot produced
> 0 : close LONGLIB after plotting
(magnitude) > 10000 : do not initialize LONGLIB before plotting
(1's digit) = 1 : plot x linear, y logarithmic (base 10)
= 2 : plot x logarithmic, y linear
= 3 : plot x logarithmic, y logarithmic
= 4 : plot x linear, y linear
(10's digit) = 0 : no axes or title plotted
= 1 : axes with axis line/ticks on top and sides
= 2 : plot solid cartesian grid
= 3 : plot ticked cartesian grid without box
= 4 : plot ticked cartesian grid with box
= 5 : ticked cartesian grid, box w/axis ticks
= 6 : plot without box or cartesian grid
= 7 : plot solid logarithmic grid
= 8 : plot dotted logarithmic grid
= 9 : plot ticked logarithmic grid
(100's) = 0 : Ask which screen device to use
<> 0 : Screen Device Number (see FRAME)
nopt (I): option flag
(1's digit) = 0 : disconnected points
= 1 : connected points
= 2 : disconnected symbols
= 3 : connected symbols
= 4 : vertical line from point to x axis
= 5 : connect points, add vertical line from each
data point to x axis
= 6 : symbol plus vertical line from point to x axis
(10's digit) = 0 : no error bars
= 1 : error bars (see above)
= 2 : error bars witout end bars (see above)
(100's) > 0 : every (*) point shown with a symbol
(0 equivalent to 1)
as (R): size of plotted symbol and/or error bar
xl (R): x axis length in inches
< 0 : use input scaling in xm,xx
> 0 : use auto scaling computed from input array
yl (R): y axis length in inches
< 0 : use input scaling in ym,yx
> 0 : use auto scaling computed from input array
(see AXIS2 for detailed description of axis parameters)
nmx (I): number of minor ticks between major ticks on x axis
nnx (I): highlight length of nnx-th minor tick on x axis
mlx (I): number of major tick marks on x axis
tsx (R): size of title and numbers on x axis
< 0 auto exponent scaling (x10 to power) disabled
> 0 auto exponent scaling (x10 to power) enabled
ndx (I): number of digits to right of decimal point on x axis
smx (R): major tick length on x axis
nmy (I): number of minor ticks between major ticks on y axis
nny (I): highlight length of nny-th minor tick on y axis
mly (I): number of major tick marks on y axis
tsy (R): size of title and numbers on y axis
< 0 auto exponent scaling (x10 to power) disabled
> 0 auto exponent scaling (x10 to power) enabled
ndy (I): number of digits to right of decimal point on y axis
smy (R): major tick length on y axis
xt (C): x axis title string
nxt (I): number of characters in xt
< 0 : axis ticks on top of x axis
= 0 : no axis
> 0 : axis ticks on bottom of x axis (normal)
yt (C): y axis title string
nyt (I): number of characters in yt
< 0 : axis ticks on right of y axis
= 0 : no axis
> 0 : axis ticks on left of y axis (normal)
t (C): plot title string
nt (I): number of characters in t
< 0 : use color array
= 0 : no title
> 0 : do not use color array
xm (R): minimum value of x array (accessed if xl or nt < 0)
xx (R): maximum value of x array (accessed if xl or nt < 0)
ym (R): minimum value of y array (accessed if xl,yl or nt<0)
yx (R): maximum value of y array (accessed if xl,yl or nt<0)
(NOTE: color array accessed if nt < 0)
ic (I): color list
ic(1) : color for grid
ic(2) : color for axis lines
ic(3) : color for axis numbers
ic(4) : color for axis titles
ic(5) : color for axis exponents
ic(6) : color for title (return)
ic(7) : color for points in line 1
ic(8) : color for symbols/error bars line 1
ic(9) : color for points in line 2
ic(10): color for symbols/error bars line 2
ic(11): etc.
common /csplotsx/xmr,dxr,ymr,dyr
xmr (R): returned value of xmin
dxr (R): returned value of scale factor (xmax-xmin)/xlen
ymr (R): returned value of ymin
dyr (R): returned value of scale factor (ymax-ymin)/ylen