*
* $Id$
*
* $Log$
*
*
* xshapedata.inc
*
*CMZ :  3.00/00 02/05/2001  20.42.25  by  Unknown
*-- Author :
*-----------------------------------------------------------------------
*   SHPDAT - Common blocks used by the wire sag routines.
*   VARIABLES : FX, FY      : Force as function of wire displacement
*               XSCAN, YSCAN: Wire displacements (abscissa of FX, FY)
*               NSCANX/Y    : Number of points in FX, FY, XSCAN, YSCAN
*               JSORD       : Force table interpolation order
*               NITMAX      : Maximum # of zero search iterations
*               EPS         : Used for building differential matrices
*               EPSX        : Positional convergence criterion
*               EPSF        : Function value convergence criterion
*               STEP        : Step size used by DRKNYS
*               NSHOT       : Number of shots
*               NSTEP       : Number of steps per shot
*               IW          : Wire currently studied
*               LFWARN      : Point found outside scanning grid
*               LFEXTR      : Permission to extrapolate force table
*               LFELEC      : Include or not electrostatics
*               LFGRAV      : Include or not gravity
*               LZROPR      : Print zero search progress
*               LFITER      : Iterate over all wires
*               NFITER      : Maximum number of all wire iterations
*               (XORIG,YORIG) Nominal wire positions
*               (XOFF,YOFF) : Wire position offsets
*               (XWIRE,YWIRE) Nominal position of the current wire
*   (Last changed on  3/ 7/96.)
*-----------------------------------------------------------------------