BiScrollersTransformsTypes.mesa
Copyright © 1992 by Xerox Corporation. All rights reserved.
Bier, March 18, 1993 1:14 pm PST
Contents: Types for BiScrollersTransforms.
DIRECTORY
Geom2D;
BiScrollersTransformsTypes: CEDAR DEFINITIONS = BEGIN
AgeOp: TYPE = {remember, ignore};
Axis: TYPE = Geom2D.Axis;
PreservationPair: TYPE = ARRAY Axis OF Preservation;
Preservation: TYPE = REAL--[0.0 .. 1.0]--;
horizontally (axis X), 0.0 is left and 1.0 is right;
vertically (axis Y), 0.0 is bottom and 1.0 is top.
ScaleOp: TYPE = RECORD [variant: SELECT op: * FROM
reset => [],
byArg => [arg: REAL],
diff => [x, y: REAL],
ENDCASE];
RotateOp: TYPE = RECORD [variant: SELECT op: * FROM
reset => [],
byArg => [arg: REAL--degrees--],
ENDCASE];
Location: TYPE = RECORD [variant: SELECT flavor: * FROM
coord => [x, y: REAL --in the appropriate coord sys--],
fraction => [fx, fy: REAL --fraction of X and Y extent, in viewer coords, of either client image or viewport--],
ENDCASE];
END.