<> <> <> <> DIRECTORY Graphics USING [Box], PETypes; PEHitTest: CEDAR DEFINITIONS = BEGIN OPEN PETypes; VertexHitTest: PROCEDURE [segmentList: SegmentList, point: Point] RETURNS [hitVertex: VertexNode, hitSegment: SegmentNode]; <> SegmentHitTest: PROCEDURE [segmentList: SegmentList, point: Point] RETURNS [hitSegment: SegmentNode, hitPoint: Point, hitT: REAL]; <> TrajectoryHitTest: PROCEDURE [trajectoryList: TrajectoryList, point: Point] RETURNS [hitTrajectory: TrajectoryNode, hitPoint: Point]; <> BoundingBox: PROCEDURE [segment: Segment] RETURNS [box: Graphics.Box]; <> BoxesIntersect: PROCEDURE [box1, box2: Graphics.Box] RETURNS [boxesIntersect: BOOLEAN]; <> END.