<> <> <> <> DIRECTORY CD USING [Position, Design]; CDMark: CEDAR DEFINITIONS = BEGIN GetMark: PROC [design: CD.Design] RETURNS [CD.Position]; <<--returns always some position, even if there is no mark>> SetMark: PROC [design: CD.Design, pos: CD.Position]; <<>> END. <<--This Module is temporary; if Marks will work properly and integrated,>> <<--Mark will be exported elsewhere>>