Annotation of OpenXM_contrib/PHC/Ada/Main/driver_for_root_refining.ads, Revision 1.1
1.1 ! maekawa 1: with text_io; use text_io;
! 2: with Standard_Complex_Vectors; use Standard_Complex_Vectors;
! 3: with Standard_Complex_Poly_Systems; use Standard_Complex_Poly_Systems;
! 4: with Standard_Complex_Solutions; use Standard_Complex_Solutions;
! 5:
! 6: procedure Driver_for_Root_Refining
! 7: ( file : in file_type; scalp,p : in Poly_Sys; basis : in natural;
! 8: scalvec : in Link_to_Vector; sols : in out Solution_List);
! 9:
! 10: -- DESCRIPTION :
! 11: -- This is the driver for root refining after the continuation.
! 12:
! 13: -- ON ENTRY :
! 14: -- file to write diagnostics on;
! 15: -- scalp the scaled system;
! 16: -- p the original polynomial system;
! 17: -- basis used for scaling;
! 18: -- scalvec vector of coefficients used for scaling;
! 19: -- sols a list of solutions of scalp.
! 20:
! 21: -- ON RETURN :
! 22: -- sols the refined solutions.
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>