<> <> <> DIRECTORY Rope USING [ROPE]; PressScreen: DEFINITIONS = BEGIN Side: TYPE = {leftSide, bothSides, rightSide}; PressScreen: PROCEDURE [pressFileName: Rope.ROPE, which: Side]; NewPressName: PROCEDURE RETURNS [pressFileName: Rope.ROPE]; <> END.