<> <> <> <> <<>> DIRECTORY ViewerClasses USING [Viewer, ViewerRec]; Containers: CEDAR DEFINITIONS = BEGIN OPEN ViewerClasses; Container: TYPE = Viewer; <> Create: PROC[info: ViewerRec _ [], paint: BOOL _ TRUE] RETURNS[container: Container]; <> ChildYBound: PROC[container: Container, child: Viewer]; <> ChildXBound: PROC[container: Container, child: Viewer]; <> ScrollOffset: PROC[container: Container] RETURNS[offTop: INTEGER]; <> <> END.