![]() ![]() | ![]() |
File: [local] / OpenXM_contrib / PHC / Ada / Math_Lib / Numbers / generic_complex_field.ads (download)
Revision 1.1.1.1 (vendor branch), Sun Oct 29 17:45:25 2000 UTC (23 years, 10 months ago) by maekawa
Import the second public release of PHCpack. OKed by Jan Verschelde. |
with Abstract_Ring; with Abstract_Ring.Field; generic with package The_Real_Ring is new Abstract_Ring(<>); with package The_Real_Field is new The_Real_Ring.Field(<>); with package The_Complex_Ring is new Abstract_Ring(<>); with package The_Complex_Field is new The_Complex_Ring.Field(<>); package Generic_Complex_Field is -- DESCRIPTION : -- Collects real and complex field, connected with the absolute value. package Real_Ring renames The_Real_Ring; package Real_Field renames The_Real_Field; package Complex_Ring renames The_Complex_Ring; end Generic_Complex_Field;