<> <> <> <> <<>> <> <<>> DIRECTORY Xl; XlRGBColorMaps: CEDAR DEFINITIONS ~ BEGIN GetRGBColorMaps: PROC [c: Xl.Connection, w: Xl.Window, mapKey: Xl.XAtom ¬ [27]] RETURNS [LIST OF StandardColorMap]; StandardColorMap: TYPE = REF <> StandardColorMapRec; StandardColorMapRec: TYPE = RECORD [ colormap: Xl.ColorMap, --colormap described redMax: CARD32, --values for pixel calculation redMult: CARD32, greenMax: CARD32, greenMult: CARD32, blueMax: CARD32, blueMult: CARD32, basePixel: Xl.Pixel, visualId: Xl.Visual, --Visual to which colormap belongs killId: Xl.ID --Id for destroying the resources ]; END.