Annotation of OpenXM_contrib/PHC/Ada/Root_Counts/Stalift/drivers_for_static_lifting.ads, Revision 1.1
1.1 ! maekawa 1: with text_io; use text_io;
! 2: with Standard_Complex_Poly_Systems; use Standard_Complex_Poly_Systems;
! 3: with Standard_Complex_Solutions; use Standard_Complex_Solutions;
! 4:
! 5: package Drivers_for_Static_Lifting is
! 6:
! 7: procedure Static_Lifting_Info;
! 8:
! 9: -- DESCRIPTION :
! 10: -- Displays information on static lifting on screen.
! 11:
! 12: procedure Driver_for_Mixed_Volume_Computation
! 13: ( file : in file_type; p : in Poly_Sys; byebye : in boolean;
! 14: q : out Poly_Sys; qsols : out Solution_List;
! 15: mv : out natural );
! 16:
! 17: -- DESCRIPTION :
! 18: -- Interactive driver for the computation of the mixed volume.
! 19:
! 20: -- ON ENTRY :
! 21: -- file output file, must be opened for output;
! 22: -- p a polynomial system;
! 23: -- byebye if true, then a bye-bye message will appear on screen,
! 24: -- if false, then no bye-bye.
! 25:
! 26: -- ON RETURN :
! 27: -- q a start system with randomly choosen coefficients,
! 28: -- which can be used in a coefficient homotopy;
! 29: -- qsols the solutions of q;
! 30: -- mv mixed volume of p and the number of solutions of q.
! 31:
! 32: end Drivers_for_Static_Lifting;
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>