<> <> <> <> <<>> DIRECTORY GGCoreTypes, SV2d, SV3d; SVBasicTypes: CEDAR DEFINITIONS = BEGIN Point2d: TYPE = SV2d.Point2d; Vector2d: TYPE = SV2d.Vector2d; Matrix3by3: TYPE = SV2d.Matrix3by3; Point3d: TYPE = SV3d.Point3d; Vector3d: TYPE = SV3d.Vector3d; Matrix4by4: TYPE = SV3d.Matrix4by4; <> <<>> BoundHedron: TYPE = REF BoundHedronObj; BoundHedronObj: TYPE = RECORD [ len: NAT, seq: SEQUENCE maxVerts: NAT OF Point3d]; BoundBox: TYPE = REF BoundBoxObj; BoundBoxObj: TYPE = GGCoreTypes.BoundBoxObj; BoundBlock: TYPE = REF BoundBlockObj; BoundBlockObj: TYPE = RECORD [loX, loY, loZ, hiX, hiY, hiZ: REAL, null, infinite: BOOL]; END.