File: Filein3d.mesa
Last edited by Eric Bier on January 28, 1987 12:46:54 pm PST
Copyright © 1984 by Xerox Corporation. All rights reserved.
Contents: Recreates a 3d database from a 3d text file of the sort produced by Fileout3d.mesa
DIRECTORY
IO,
Rope,
SVSceneTypes;
Filein3d: CEDAR DEFINITIONS =
BEGIN
Scene: TYPE = SVSceneTypes.Scene;
FileinScene:
PROC [scene: Scene, f:
IO.
STREAM, wdirForAIS: Rope.
ROPE];
RopeNotOnTop: SIGNAL [position: NAT, wasThere: Rope.ROPE, notThere: Rope.ROPE];
END.