ImagerBox.mesa
Copyright Ó 1985, 1986, 1991 by Xerox Corporation. All rights reserved.
Michael Plass, November 21, 1986 10:06:25 am PST
Doug Wyatt, May 19, 1985 4:24:20 pm PDT
DIRECTORY Vector2 USING [VEC];
ImagerBox: CEDAR DEFINITIONS
~ BEGIN
Types
VEC: TYPE ~ Vector2.VEC;
Extents: TYPE ~ RECORD [leftExtent, rightExtent, descent, ascent: REAL];
Rectangle: TYPE ~ RECORD [x, y, w, h: REAL];
Box: TYPE ~ RECORD [xmin, ymin, xmax, ymax: REAL];
Operations
BoxFromRectangle: PROC [Rectangle] RETURNS [Box];
RectangleFromBox: PROC [Box] RETURNS [Rectangle];
BoxFromExtents: PROC [Extents] RETURNS [Box];
ExtentsFromBox: PROC [Box] RETURNS [Extents];
IntersectBox: PROC [Box, Box] RETURNS [Box];
BoundingBox: PROC [Box, Box] RETURNS [Box];
BoundPoint: PROC [Box, VEC] RETURNS [Box];
END.