Return to driver_for_own_start_system.ads CVS log | Up to [local] / OpenXM_contrib / PHC / Ada / Main |
File: [local] / OpenXM_contrib / PHC / Ada / Main / driver_for_own_start_system.ads (download)
Revision 1.1.1.1 (vendor branch), Sun Oct 29 17:45:23 2000 UTC (23 years, 8 months ago) by maekawa
Import the second public release of PHCpack. OKed by Jan Verschelde. |
with text_io; use text_io; with Standard_Complex_Poly_Systems; use Standard_Complex_Poly_Systems; with Standard_Complex_Solutions; use Standard_Complex_Solutions; procedure Driver_for_Own_Start_System ( file : in file_type; p : in Poly_Sys; q : out Poly_Sys; qsols : in out Solution_List ); -- DESCRIPTION : -- This procedure implements an interactive driver for reading -- a start system delivered by user. -- ON ENTRY : -- file to write diagnostics on; -- p a polynomial system. -- ON RETURN : -- q a start system based on the chosen root count; -- qsols the solutions of q.