ColorCorrectAIS.mesa
Copyright © 1986 by Xerox Corporation. All rights reserved.
Eric Nickell, January 15, 1986 11:10:34 am PST
DIRECTORY
ColorTransforms USING [CCT, UCR],
Rope USING [ROPE],
SampleMapOps USING [SampleMap];
~
BEGIN
CCT: TYPE ~ ColorTransforms.CCT;
ROPE: TYPE ~ Rope.ROPE;
SampleMap: TYPE ~ SampleMapOps.SampleMap;
UCR: TYPE ~ ColorTransforms.UCR;
Sep: TYPE ~ {red, green, blue, cyan, magenta, yellow, black};
RootToNames: PROC [root: ROPE] RETURNS [names: ARRAY Sep OF ROPE];
NamesToSampleMaps: PROC [names: ARRAY Sep OF ROPE] RETURNS [sm: ARRAY Sep OF SampleMap];
CorrectSMs: PUBLIC PROC [sm: ARRAY Sep OF SampleMap, cct: CCT, ucr: UCR];
SaveCMYKToDisk: PUBLIC PROC [sm: ARRAY Sep OF SampleMap, names: ARRAY Sep OF ROPE];
CorrectAIS: PUBLIC PROC [names: ARRAY Sep OF ROPE, cct: CCT, ucr: UCR];