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

VAR done: BOOLEAN;

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

END RealInOut.def
