<> <> <> <> <> DIRECTORY Rope, SVModelTypes, SVSceneTypes; SVScenePrivate: CEDAR DEFINITIONS = BEGIN <> <> Scene: TYPE = SVSceneTypes.Scene; Slice: TYPE = SVSceneTypes.Slice; SliceList: TYPE = SVSceneTypes.SliceList; LightSourceList: TYPE = SVModelTypes.LightSourceList; -- LIST OF LightSource; LightSource: TYPE = SVModelTypes.LightSource; <> MasterObject: TYPE = SVSceneTypes.MasterObject; MasterObjectList: TYPE = LIST OF MasterObject; <> <> TemporaryRemoveFromAssemblyList: PROC [a: Slice, al: SliceList, scene: Scene] RETURNS [newAl: SliceList, success: BOOL]; <> <> <> FindMasterObjectAndNeighborsFromName: PROC [moName: Rope.ROPE, moList: MasterObjectList] RETURNS [beforeMo, mo, afterMo: MasterObjectList, found: BOOL]; FindLightSourceAndNeighborsFromName: PROC [lsName: Rope.ROPE, lsList: LightSourceList] RETURNS [beforeLS, ls, afterLS: LightSourceList]; LightSourceNotFound: SIGNAL; <> <> CopyNeededMasterObjects: PROC [assembly: Slice, fromScene, toScene: Scene] RETURNS [success: BOOL]; <> <> RemoveDuplicateMOs: PROC [moList: MasterObjectList] RETURNS [uniqueList: MasterObjectList]; MoListMinusMoList: PROC [moList1, moList2: MasterObjectList] RETURNS [moList1MinusmoList2: MasterObjectList]; CopyMasterObjectList: PROC [moList: MasterObjectList] RETURNS [copy: MasterObjectList]; END. <<>>