Previous: dem67 Up: ../plot79_d.html Next: dem74

DEM70

       SUBROUTINE  DEM70 (NIN,NOUT)
 C$    (DEM70 - Polygon Shading Styles)
 C$    Illustrate the built-in polygon shading styles available in
 C$    the CORE system  with routines PGNR2,  SETPES, SETPFI,  and
 C$    SETPIS.   The  plot  is  parametrized  so  that  simply  by
 C$    changing values of variables in the DATA statements  below,
 C$    the scale and format is automatically adjusted to display a
 C$    total of  min(MAXPST,NX*NY)  shading  styles  on  a  single
 C$    frame.
 C$    (20-JUL-89)