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)