Previous: pmka3 Up: ../plot79_p.html Next: pmkr2
SUBROUTINE PMKA4 (XARRAY,INCX,YARRAY,INCY,ZARRAY,INCZ,
X HARRAY,INCH,N)
C$ (Polymarker Absolute 4-D)
C$ Beginning at the current point, draw markers at each of the
C$ N 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. The marker used will be that
C$ currently selected. If an increment INCX, INCY, INCZ, or
C$ INCH is negative, the starting vertex is taken as (1-N)*INC
C$ + 1 instead of 1, so that the array is stepped through in
C$ reverse order.
C$ (02-APR-82)