Previous: plna3 Up: ../plot79_p.html Next: plndo

PLNA4

       SUBROUTINE  PLNA4 (XARRAY,INCX,YARRAY,INCY,ZARRAY,INCZ,
      X                   HARRAY,INCH,N)
 C$    (Polyline Absolute 4-D)
 C$    Beginning at the current point, draw line segments to  each
 C$    of the N 4-D homogeneous world coordinate points stored  in
 C$    (XARRAY(*),YARRAY(*),ZARRAY(*),HARRAY(*)) in  turn,  ending
 C$    at the  N-th  point  which  will  become  the  new  current
 C$    position.  INCX, INCY, INCZ, and INCH are the displacements
 C$    between successive X,  Y, Z,  and H values  in the  arrays.
 C$    These will normally be all 1.  If an increment INCX,  INCY,
 C$    INCZ, or INCH is negative, the starting vertex is taken  as
 C$    (1-N)*INC + 1 instead  of 1, so that  the array is  stepped
 C$    through in reverse order.
 C$    (02-APR-82)