%N pgqcol %F $MIR/src/pgqcol.f
%D Inquire color capability
%B
      SUBROUTINE PGQCOL (CI1, CI2)
      INTEGER  CI1, CI2

 Query the range of color indices available on the current device.

 Argument:
  CI1    (output) : the minimum available color index. This will be
                    either 0 if the device can write in the
                    background color, or 1 if not.
  CI2    (output) : the maximum available color index. This will be
                    1 if the device has no color capability, or a
                    larger number (e.g., 3, 7, 15, 255).
