SilColor.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
Last Edited by Ken Pier, August 2, 1985 10:32:34 am PDT
DIRECTORY
ImagerColor USING [Color],
Rope USING [ROPE],
SilFile USING [Color]
;
SilColor: CEDAR DEFINITIONS = BEGIN
Color: TYPE = SilFile.Color;
CCharArray: TYPE = ARRAY Color OF Rope.ROPE; --these are one character length ropes
silCChars: CCharArray; --maps color numbers to Sil colors; see SilDoc.tioga for colors
defaultColorChar: Rope.ROPE;
Info on what order the Sil colors are in (for instance 0 corresoponds to Neutral)
colorOrder: Rope.ROPE; -- = "NRYGCVMWDOLTAUPS"
ColorArray: TYPE = ARRAY Color OF ImagerColor.Color; --for real color implementation
silColors: ColorArray; --same mapping as CCharArray, except to actual colors
END.