<> <> <> <> DIRECTORY IndexToolPrivate, Rope; IndexViewer: CEDAR DEFINITIONS = BEGIN OPEN IndexToolPrivate; ROPE: TYPE = Rope.ROPE; NewTool: PROCEDURE [documentName: ROPE] RETURNS [indexHandle: IndexHandle _ NEW[IndexHandleRec]]; END.