<<>> <> <> <> <> <<>> <> <<>> DIRECTORY IO USING [STREAM], MSBasics USING [BodyPartType], Rope USING [ROPE]; MSMessage: CEDAR DEFINITIONS ~ BEGIN STREAM: TYPE ~ IO.STREAM; ROPE: TYPE ~ Rope.ROPE; BodyPartType: TYPE ~ MSBasics.BodyPartType; <> <> headingBodyPart: BodyPartType = 0; <> vpFolder: BodyPartType = 1; <> nsTextFile: BodyPartType = 2; <> vpDocument: BodyPartType = 3; <> otherNSFile: BodyPartType= 4; <> multinationalNote: BodyPartType= 5; <> ia5Note: BodyPartType= 6; <> pilotFile: BodyPartType = 7; <> g3Fax: BodyPartType = 8; <> teletex: BodyPartType = 9; <> telex: BodyPartType = 10; <> iso6937Note: BodyPartType = 11; <> interpress: BodyPartType = 12; <> <<>> RopeFromBodyPartType: PROC [type: BodyPartType] RETURNS [rope: ROPE]; <> <> GetHeader: PROC [bodypart: STREAM] RETURNS [text, plainText, formatting: STREAM, bodyAnnotSize: CARD32]; <> <<>> GetHeaderRope: PROC [bodypart: STREAM] RETURNS [text, plainText, formatting: ROPE, bodyAnnotSize: CARD32]; <> <<>> GetNote: PROC [bodypart: STREAM] RETURNS [text: STREAM]; <> <<>> GetNoteRope: PROC [bodypart: STREAM] RETURNS [text: ROPE]; <> <<>> GetIA5Note: PROC [bodypart: STREAM] RETURNS [text: STREAM]; <> <<>> GetIA5NoteRope: PROC [bodypart: STREAM] RETURNS [text: ROPE]; <> <<>> <> <<>> END.