Annotation of OpenXM_contrib/PHC/Ada/Math_Lib/Numbers/generic_complex_field.ads, Revision 1.1.1.1
1.1 maekawa 1: with Abstract_Ring;
2: with Abstract_Ring.Field;
3:
4: generic
5:
6: with package The_Real_Ring is new Abstract_Ring(<>);
7: with package The_Real_Field is new The_Real_Ring.Field(<>);
8: with package The_Complex_Ring is new Abstract_Ring(<>);
9: with package The_Complex_Field is new The_Complex_Ring.Field(<>);
10:
11: package Generic_Complex_Field is
12:
13: -- DESCRIPTION :
14: -- Collects real and complex field, connected with the absolute value.
15:
16: package Real_Ring renames The_Real_Ring;
17: package Real_Field renames The_Real_Field;
18: package Complex_Ring renames The_Complex_Ring;
19:
20: end Generic_Complex_Field;
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>