Annotation of OpenXM_contrib/PHC/Ada/Root_Counts/Implift/fewnomial_system_solvers.ads, Revision 1.1.1.1
1.1 maekawa 1: with Standard_Complex_Laur_Systems; use Standard_Complex_Laur_Systems;
2: with Standard_Complex_Solutions; use Standard_Complex_Solutions;
3:
4: package Fewnomial_System_Solvers is
5:
6: -- DESCRIPTION :
7: -- This package contains a solver for Laurent polynomial systems,
8: -- where there are at most n+1 different terms.
9:
10: function Is_Fewnomial_System ( p : Laur_Sys ) return boolean;
11:
12: -- DESCRIPTION :
13: -- returns true if p has at most n+1 different terms.
14:
15: procedure Solve ( p : in Laur_Sys; sols : in out Solution_List;
16: fail : out boolean );
17:
18: -- DESCRIPTION :
19: -- tries to solve the fewnomial system p.
20:
21: -- ON ENTRY :
22: -- p a Laurent polynomial system.
23:
24: -- ON RETURN :
25: -- sols solutions of p, all solutions have only nonzero components;
26: -- fail true if p has more than n+1 different terms
27: -- or if p has an infinite number of solutions.
28:
29: end Fewnomial_System_Solvers;
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>