<> <> DIRECTORY BasicTime USING [GMT], Rope USING [ROPE]; DateAndTime: CEDAR DEFINITIONS = BEGIN Notes: TYPE = {normal, noZone, zoneGuessed, noTime, timeAndZoneGuessed}; <> Parse: PROC [r: Rope.ROPE] RETURNS [dt: BasicTime.GMT, notes: Notes, length: NAT]; <> Unintelligible: ERROR [vicinity: NAT]; <> END.