<> <> <> DIRECTORY ImagerBasic, Rope; ImagerColor: CEDAR DEFINITIONS = BEGIN Color: TYPE = ImagerBasic.Color; MakeGray: PROC [intensity: REAL] RETURNS [Color]; HSVToColor: PROC [h, s, v: REAL] RETURNS [Color]; RGBToColor: PROC [r, g, b: REAL] RETURNS [Color]; ColorToHSV: PROC [color: Color] RETURNS [h, s, v: REAL]; ColorToRGB: PROC [color: Color] RETURNS [r, g, b: REAL]; AISToColor: PROC [aisName: Rope.ROPE] RETURNS [Color]; END.