Previous: hiddos Up: ../plot79_h.html Next: hidgv
SUBROUTINE HIDEV (Z1,ZE,Z2, NX,NE, PL2) C$ (Elliptical View) C$ Program to produce a perspective drawing of a single valued C$ function defined over elliptical coordinates in such a way C$ as to exhibit the arcs corresponding to constant XI and C$ ETA. Cartesian coordinates are related to these by the C$ following: C$ C$ X = 0.5*COSH(XI)*COS(ETA) C$ Y = 0.5*SINH(XI)*SIN(ETA) C$ C$ The arguments are: C$ C$ (Z1,Z2)........Range of Z values C$ ZE(NX,NE)......Array of function values C$ NX.............Number of XI values C$ NE.............Number (=4*N+1) of ETA values C$ PL2............2-D pen movement subroutine, normally PL2CA C$ C$ (04-FEB-82)