CHARACTER FUNCTION COL_DOS ( INDEX, ICODE )

Argument Definitions (+ indicates altered content)
INTEGER            ICODE,      INDEX
Description
col_DOS.for
Source file:col_dos.f
Local Variables (+ indicates altered content)
INTEGER           +I
Referenced Common Block Variables (+ indicates altered content)
DOS_COL            CHARACTER*6        COLORS(20)
DOS_COL            CHARACTER*6        DOSCOL(20)
DOS_COL            INTEGER            INDEX_DOS(20)
DOS_COL            INTEGER            NCOLORS