<> <> <> <> DIRECTORY IO, Rope, SVSceneTypes; SVFiles: DEFINITIONS = BEGIN Scene: TYPE = SVSceneTypes.Scene; SceneTable: TYPE = LIST OF Scene; OpenScene: PROC [picName: Rope.ROPE, wdirForAIS: Rope.ROPE] RETURNS [scene: Scene, success: BOOL]; SaveScene: PROC [updatedScene: Scene, picName: Rope.ROPE] RETURNS [success: BOOL]; StoreScene: PROC [unNamedScene: Scene, newPicName: Rope.ROPE] RETURNS [success: BOOL]; FileExists: PROC [fileName: Rope.ROPE] RETURNS [answer: BOOL]; OpenFile: PROC [picName: Rope.ROPE] RETURNS [f: IO.STREAM, success: BOOL]; FilenameMinusExtension: PROC [wholeName: Rope.ROPE] RETURNS [firstPart: Rope.ROPE]; END.