Previous: inqpn Up: ../plot79_i.html Next: inqppo
SUBROUTINE INQPPA (PARRAY,MAXROW,MAXCOL,NROW,NCOL)
C$ (Inquire Polygon Pixel Array)
C$ Return the current polygon pixel array which is to be used
C$ for filling polygons of interior style "patterned" on
C$ devices which can support that feature. Each row of NCOL
C$ elements in the array corresponds to NCOL successive pixels
C$ on a raster line, and the row is repeated every NCOL
C$ pixels. Similarly, the NROW rows correspond to the same
C$ number of raster lines, and the pattern is repeated every
C$ NROW rasters. The arguments are:
C$
C$ PARRAY(*,*)......INTEGER array of pixel values which are to
C$ be used for filling a polygon of interior
C$ style "patterned". The range of integer
C$ values which may be used for a pixel
C$ element is device dependent.
C$ MAXROW,MAXCOL....Actual declared dimensions of PARRAY(*,*)
C$ in the calling program. If they are too
C$ small to contain the pixel pattern array,
C$ only the first MAXROW rows and/or MAXCOL
C$ columns will be returned, and a warning
C$ message will be issued.
C$ NROW,NCOL........Number of rows and columns in PARRAY(*,*)
C$ which are currently in use. A minimum of
C$ 16 rows and columns is guaranteed to be
C$ available for each display device.
C$
C$ (27-JAN-82)