<> <> <> <> <> DIRECTORY CD USING [InstanceList, Object, Rect], Rope USING [ROPE], SX USING [LogicalCell]; SXAccessInternal: CEDAR DEFINITIONS = BEGIN Analyze: PROC [hierarchyRoots: CD.InstanceList]; GetLogicalCell: PROC [ob: CD.Object] RETURNS [REF SX.LogicalCell]; AnalyzePreparedOb: PROC [ob: CD.Object]; PutError: PROC [ob: CD.Object, r: CD.Rect, message: Rope.ROPE]; END.