Annotation of OpenXM_contrib/PHC/Ada/Continuation/multprec_residual_evaluations.ads, Revision 1.1.1.1
1.1 maekawa 1: with text_io; use text_io;
2: with Multprec_Floating_Numbers; use Multprec_Floating_Numbers;
3: with Multprec_Complex_Vectors; use Multprec_Complex_Vectors;
4: with Multprec_Complex_Poly_SysFun; use Multprec_Complex_Poly_SysFun;
5: with Multprec_Complex_Solutions; use Multprec_Complex_Solutions;
6:
7: package Multprec_Residual_Evaluations is
8:
9: -- DESCRIPTION :
10: -- This package provides routines to evaluate solutions of polynomial
11: -- systems using multi-precision arithmetic.
12:
13: function Residual ( p_eval : Eval_Poly_Sys; zero : Vector )
14: return Floating_Number;
15:
16: -- DESCRIPTION :
17: -- Returns maximal component in absolute value of the evaluation
18: -- of the zero in the system.
19:
20: procedure Residual ( file : in file_type;
21: p_eval : in Eval_Poly_Sys; sol : in Solution );
22:
23: -- DESCRIPTION :
24: -- Writes the residual of the solution on the file.
25:
26: procedure Residuals ( file : in file_type;
27: p_eval : in Eval_Poly_Sys; sols : in Solution_List );
28:
29: -- DESCRIPTION :
30: -- Writes the residuals of the solutions on the file.
31:
32: end Multprec_Residual_Evaluations;
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>