DEFINITION MODULE InOut;

CONST
  EOL = 15C;  (* cr *)

VAR
  Done:   BOOLEAN;
  termCH: CHAR;


PROCEDURE OpenInput (defext: ARRAY OF CHAR);

PROCEDURE OpenOutput (defext: ARRAY OF CHAR);

PROCEDURE CloseInput;

PROCEDURE CloseOutput;

PROCEDURE Read (VAR ch: CHAR);

PROCEDURE ReadString (VAR s: ARRAY OF CHAR);

PROCEDURE ReadInt (VAR x: INTEGER);

PROCEDURE ReadCard (VAR x: CARDINAL);

PROCEDURE ReadLong (VAR x: LONGINT);

PROCEDURE Write (ch: CHAR);

PROCEDURE WriteLn;

PROCEDURE WriteString (s: ARRAY OF CHAR);

PROCEDURE WriteInt (x: INTEGER; n: CARDINAL);

PROCEDURE WriteCard (x, n: CARDINAL);

PROCEDURE WriteOct (x, n: CARDINAL);

PROCEDURE WriteHex (x, n: CARDINAL);

PROCEDURE WriteLong (x: LONGINT; n: CARDINAL);

PROCEDURE WriteLongHex (x: LONGINT; n: CARDINAL);


END InOut.
