with text_io; use text_io;
with Multprec_Complex_Numbers; use Multprec_Complex_Numbers;
package Multprec_Complex_Numbers_io is
-- DESCRIPTION :
-- This package provides input/output routines for complex numbers.
-- A complex number is displayed as two floating numbers, representing
-- respectively the real and imaginary part of the complex number.
procedure get ( x : in out Complex_Number );
procedure get ( file : in file_type; x : in out Complex_Number );
procedure put ( x : in Complex_Number );
procedure put ( file : in file_type; x : in Complex_Number );
procedure put ( c : in Complex_Number; fore,aft,exp : in natural );
procedure put ( file : in file_type;
c : in Complex_Number; fore,aft,exp : in natural );
procedure put ( c : in Complex_Number; dp : in natural );
procedure put ( file : in file_type;
c : in Complex_Number; dp : in natural );
end Multprec_Complex_Numbers_io;