c
c------------------------------------------------------------------
c Begin file /home/sting/foster/plt/color.h
c------------------------------------------------------------------
c
      parameter(mxclrs=16)                                              
c
c iblack = 0, iwhite = 1, ired = last color in table
c
      common/clrcom/ nclrs,ixclr(mxclrs),rgbv(3,mxclrs),iblack,iwhite,
     +              iclrfill,ired,iclrtxt 
c