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

FROM SYSTEM IMPORT
 FFP;
 
VAR done: BOOLEAN;

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

END FFPInOut.
