[BACK]Return to reduction_of_nonsquare_systems.ads CVS log [TXT][DIR] Up to [local] / OpenXM_contrib / PHC / Ada / Homotopy

Annotation of OpenXM_contrib/PHC/Ada/Homotopy/reduction_of_nonsquare_systems.ads, Revision 1.1

1.1     ! maekawa     1: with Standard_Complex_Poly_Systems;      use Standard_Complex_Poly_Systems;
        !             2:
        !             3: package Reduction_of_Nonsquare_Systems is
        !             4:
        !             5: -- DESCRIPTION :
        !             6: --   This package provides two different approaches for reducing
        !             7: --   a overconstrained system to a square system.
        !             8:
        !             9:   function Random_Square ( p : in Poly_Sys ) return Poly_Sys;
        !            10:
        !            11:   -- DESCRIPTION :
        !            12:   --   The system q (q'range = 1..N) on return will be square, like
        !            13:   --     q(i) = p(i) + l(i,N+1)*p(N+1) + .. + l(i,n)*p(n), for i=1,2,..,N.
        !            14:   --   This type of reduction is recommended when the solution of any
        !            15:   --   subsystem of p (p'range = 1,..,n) has a connected solution component.
        !            16:
        !            17:   function Reduced_Square ( p : in Poly_Sys ) return Poly_Sys;
        !            18:
        !            19:   -- DESCRIPTION :
        !            20:   --   The system q (q'range = 1,..,N) on return will be square, like
        !            21:   --     q(i) = Rpoly(..(Rpoly(p(i),p(N+1)), p(n)), for i=1,2,..,N,
        !            22:   --   i.e.: the additional polynomial will be used for reducing the system.
        !            23:   --   This type of reduction is recommended when the solution set of the
        !            24:   --   first N equation of p consists of isolated points that do not all
        !            25:   --   satisfy the remaining equations.
        !            26:
        !            27: end Reduction_of_Nonsquare_Systems;

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>