<> <> <> <<>> DIRECTORY Graph USING [EntityList, SegmentDataList, Texts, ValueList], GraphPrivate USING [GraphHandle]; GraphCleanUp: CEDAR DEFINITIONS = { OPEN Graph, GraphPrivate; CleanUpHandle: PROC [handle: GraphHandle, full: BOOL _ FALSE] RETURNS [GraphHandle]; CleanUpVL: PROC [vl: ValueList] RETURNS [ValueList]; CleanUpSDL: PROC [sdl: SegmentDataList] RETURNS [SegmentDataList]; CleanUpEL: PROC [el: EntityList, everything: BOOL _ FALSE] RETURNS [EntityList]; CleanUpTexts: PROC [texts: Texts, everything: BOOL _ FALSE] RETURNS [Texts]; }. LOG. Previous version erased 10/16/85 by a vandal. SChen, October 16, 1985 1:35:55 pm PDT, recreated. <<>>