<> <> <> <> DIRECTORY SV2d, SVInterfaceTypes; SVStretch: CEDAR DEFINITIONS = BEGIN Point2d: TYPE = SV2d.Point2d; ViewerToolData: TYPE = SVInterfaceTypes.ViewerToolData; StartDrag: PROC [viewerToolData: ViewerToolData, cameraPoint: Point2d]; SetDrag: PROC [viewerToolData: ViewerToolData, cameraPoint: Point2d]; EndDrag: PROC [viewerToolData: ViewerToolData, cameraPoint: Point2d]; StartCameraDrag: PUBLIC PROC [viewerToolData: ViewerToolData, cameraPoint: Point2d]; SetCameraDrag: PUBLIC PROC [viewerToolData: ViewerToolData, cameraPoint: Point2d]; EndCameraDrag: PUBLIC PROC [viewerToolData: ViewerToolData, cameraPoint: Point2d]; END.