-- File: SVViewer.mesa
-- Last edited by Bier on December 18, 1982 1:46 am
-- Author: Eric Bier on October 4, 1982 1:14 pm
-- Contents: Code to create a view onto a 3d scene.

DIRECTORY
 DisplayList3d,
 SVViewerUser,
 ViewerClasses;

SVViewer: DEFINITIONS =
BEGIN

Scene: TYPE = DisplayList3d.Scene;
Viewer: TYPE = ViewerClasses.Viewer;
ViewerToolData: TYPE = SVViewerUser.ViewerToolData;

CreateViewerTool: PROC [parentData: REF ANY, scene: Scene, iconic: BOOL, paint: BOOL] RETURNS [viewerToolData: ViewerToolData, viewerPicture: Viewer];

END.