Previous: hidse Up: ../plot79_h.html Next: hidsk


HIDSES

       SUBROUTINE  HIDSES (Z0, Z1,ZE,Z2, MX,MY, NX,NY, LX,LY, S, PL2)
 C$    (Southeast Sheared View - Stereo)
 C$    Produce  a  stereo   parallel  projection   drawing  of   a
 C$    single-valued function  defined in  Cartesian  coordinates,
 C$    exhibiting arcs on the  surface parallel to the  coordinate
 C$    axes.  A  stereo  sheared  view  from  somewhat  above  the
 C$    southeast (1,0,0) corner is produced.  The arguments are:
 C$
 C$    Z0........Cutoff  value.   Only  function  values, ZE(I,J),
 C$              above (S .GT.  0.0) or  below (S .LT.  0) Z0  are
 C$              visible.
 C$    ZE(*,*)...Array containing the surface.  ZE(I,J) =
 C$              F(X(I),Y(J)).
 C$    Z1,Z2.....Span of surface values.
 C$    MX,MY.....Actual declared dimensions of the array ZE(*,*).
 C$    NX,NY.....Sections of ZE(*,*) actually used.
 C$    LX,LY.....Increments  in  X  and  Y  directions  (.GT.  0).
 C$              Values of  LX  and LY  larger  than 1  produce  a
 C$              coarser mesh on  the drawing  without losing  the
 C$              smoothness of the complete surface.  LX should be
 C$              an integral divisor of NX-1, and LY of NY-1.   If
 C$              this is  not the  case, the  next smallest  value
 C$              which  satisfies   this   requirement   is   used
 C$              internally.
 C$    S.........=+1.0, graph positive part of function,
 C$              =-1.0, graph negative part of function,
 C$              = 0.0, graph both positive and negative parts.
 C$              If S = 0.0, the cutoff value Z0 has no effect.
 C$    PL2.......2-D pen movement subroutine, usually PL2CA
 C$
 C$    (04-FEB-82)