File: [local] / OpenXM_contrib / PHC / Ada / Homotopy / multprec_complex_solutions_io.ads (download)
Revision 1.1.1.1 (vendor branch), Sun Oct 29 17:45:23 2000 UTC (23 years, 11 months ago) by maekawa
Branch: PHC, MAIN
CVS Tags: v2, maekawa-ipv6, RELEASE_1_2_3, RELEASE_1_2_2_KNOPPIX_b, RELEASE_1_2_2_KNOPPIX, RELEASE_1_2_2, RELEASE_1_2_1, HEAD Changes since 1.1: +0 -0
lines
Import the second public release of PHCpack.
OKed by Jan Verschelde.
|
with text_io; use text_io;
with Multprec_Complex_Solutions; use Multprec_Complex_Solutions;
package Multprec_Complex_Solutions_io is
-- DESCRIPTION :
-- This routines provides routines for input and output of solutions.
-- FOR SOLUTION VECTORS ONLY :
procedure get_vector ( s : in out Solution );
procedure get_vector ( file : in file_type; s : in out Solution );
-- DESCRIPTION :
-- The input must contain the solution vector.
procedure put_vector ( s : in Solution );
procedure put_vector ( file : in file_type; s : in Solution );
-- DESCRIPTION :
-- On the output the solution vector will be written.
-- FOR SOLUTIONS :
procedure get ( s : out Solution );
procedure get ( n : in natural; ls : out Link_to_Solution );
procedure get ( file : in file_type; s : out Solution );
procedure get ( file : in file_type;
n : in natural; ls : out Link_to_Solution );
-- DESCRIPTION :
-- The input must contain the following : s.t, s.m and s.v(i),
-- a vector of s.n complex numbers
procedure put ( s : in Solution );
procedure put ( file : in file_type; s : in Solution );
-- DESCRIPTION :
-- On the output the following will be written :
-- s.t, s.m and s.v, a vector of s.n complex numbers
-- FOR LISTS OF SOLUTIONS :
procedure get ( sols : in out Solution_List );
procedure get ( sols,sols_last : in out Solution_List );
procedure get ( len,n : in natural; sols : in out Solution_List );
procedure get ( len,n : in natural; sols,sols_last : in out Solution_List );
procedure get ( file : in file_type; sols : in out Solution_List );
procedure get ( file : in file_type; sols,sols_last : in out Solution_List );
procedure get ( file : in file_type; len,n : in natural;
sols : in out Solution_List );
procedure get ( file : in file_type; len,n : in natural;
sols,sols_last : in out Solution_List );
-- DESCRIPTION :
-- A solution list will be read. If the length len and dimension n
-- of the list is not supplied, then they will be read first.
-- If the parameter sols_last is supplied, then this parameter contains
-- the pointer to the last element of the list on return.
-- The solutions should be in the appropriate format.
procedure put ( sols : in Solution_List );
procedure put ( len,n : in natural; sols : in Solution_List );
procedure put ( file : in file_type; sols : in Solution_List );
procedure put ( file : in file_type; len,n : in natural;
sols : in Solution_List );
-- DESCRIPTION :
-- The solutions are written on standard output or on file.
-- First the length of the list and the dimension of the solutions
-- will be put on file if they are supplied as parameter.
-- USER-FRIENDLY ROUTINES :
procedure Display_Format;
-- DESCRIPTION :
-- Displays on screen the formatting rules as on-line help facility.
procedure Read ( sols : in out Solution_List );
-- DESCRIPTION :
-- Reads the solution list from file, displays the formatting information
-- in case of exception and let the user try again.
end Multprec_Complex_Solutions_io;