Return to generic_complex_numbers_io.ads CVS log | Up to [local] / OpenXM_contrib / PHC / Ada / Math_Lib / Numbers |
File: [local] / OpenXM_contrib / PHC / Ada / Math_Lib / Numbers / generic_complex_numbers_io.ads (download)
Revision 1.1.1.1 (vendor branch), Sun Oct 29 17:45:25 2000 UTC (23 years, 9 months ago) by maekawa
Import the second public release of PHCpack. OKed by Jan Verschelde. |
with text_io; use text_io; with Abstract_Ring_io; with Abstract_Ring.Field; with Generic_Complex_Numbers; generic with package Field is new Abstract_Ring.Field(<>); with package Ring_io is new Abstract_Ring_io(Field.Ring); with package Complex_Numbers is new Generic_Complex_Numbers(Ring_io.Ring,Field); package Generic_Complex_Numbers_io is -- DESCRIPTION : -- This package provides io-routines for complex numbers. -- A complex number is displayed as two floating numbers, representing -- respectively the real and imaginary part of the complex number. use Complex_Numbers; 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 ); end Generic_Complex_Numbers_io;