IPVariables.mesa
Last edited by Andy Shore, January 19, 1983 3:29 pm
DIRECTORY
IPLimits USING [topFrameSize];
IPVariables: CEDAR DEFINITIONS = BEGIN
FrameVariable: TYPE = [0..IPLimits.topFrameSize);
ImagerVariableValues: TYPE = MACHINE DEPENDENT { -- see IP82 4 (4.2)
DCScpx(0), DCScpy(1),
correctMX(2), correctMY(3),
T(4),
priorityImportant(5),
mediumXSize(6), mediumYSize(7),
fieldXMin(8), fieldYMin(9),
fieldXMax(10), fieldYMax(11),
showVec(12),
color(13),
noImage(14),
strokeWidth(15),
strokeEnd(16),
underlineStart(17),
amplifySpace(18),
correctPass(19),
correctShrink(20),
correctTX(21), correctTY(22)
};
ImagerVariable: TYPE = ImagerVariableValues[DCScpx..correctTY];
allows symbolic referencing: IPVariables.ImagerVariable[priorityImportant]
StrokeEndValues: TYPE = MACHINE DEPENDENT { -- see IP82 (4.8.2)
square(0),
butt(1),
round(2)
};
StrokeEnd: TYPE = StrokeEndValues[square..round];
END.
Change Log
Created by Shore; September 16, 1982 11:00 am
Changed by Shore; September 24, 1982 2:33 pm
added StrokeEnd
Changed by Shore; September 26, 1982 1:09 pm
added subrange defs for ImagerVariable and StrokeEnd
Changed by Shore; November 11, 1982 2:51 pm
change to Cedar.Style and added node styles
Changed by Shore; January 19, 1983 3:28 pm
made module CEDAR, changed node formats