<> <> <> <> <<>> DIRECTORY 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 = RECORD [loX, loY, hiX, hiY: REAL, null, infinite: BOOL]; BoundSphere: TYPE = REF BoundSphereObj; BoundSphereObj: TYPE = RECORD [ center: Point3d, -- in Camera coordinates radius: REAL, radiusSquared: REAL]; END.