File: SVStretch.mesa
Last edited by: Eric Bier on August 17, 1984 4:26:57 pm PDT
Copyright © 1984 by Xerox Corporation. All rights reserved.
Contents: Interactive solidviews operations like dragging and stretching objects.
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.