(* $N- *)
DEFINITION MODULE LongRealInOut; (* jr/8jul87 *)

VAR done: BOOLEAN;

PROCEDURE WriteReal(r: LONGREAL; width, dec: INTEGER);
PROCEDURE ReadReal(VAR r: LONGREAL);

END LongRealInOut.
