source: git/Singular/mpr_inout.h @ 2c694a2

fieker-DuValspielwiese
Last change on this file since 2c694a2 was 416465, checked in by Olaf Bachmann <obachman@…>, 25 years ago
* bug-fixes from work with Thomas git-svn-id: file:///usr/local/Singular/svn/trunk@3826 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 2.5 KB
RevLine 
[a5f15a]1#ifndef MPR_H
2#define MPR_H
3/****************************************
4*  Computer Algebra System SINGULAR     *
5****************************************/
[9a6c4a]6
[416465]7/* $Id: mpr_inout.h,v 1.5 1999-11-15 17:20:31 obachman Exp $ */
[a5f15a]8
[e858e7]9/*
[a5f15a]10* ABSTRACT - multipolynomial resultants - interface to Singular
[e858e7]11*
[a5f15a]12*/
13
14#define DEFAULT_DIGITS 30
15
16#define MPR_DENSE  1
17#define MPR_SPARSE 2
18
19/** solve a multipolynomial system using the u-resultant
20 * Input ideal must be 0-dimensional and pVariables == IDELEMS(ideal).
[e858e7]21 * Resultant method can be MPR_DENSE, which uses Macaulay Resultant (good for
22 * dense homogeneous polynoms) or MPR_SPARSE, which uses Sparse Resultant
[a5f15a]23 * (Gelfand, Kapranov, Zelevinsky).
[da408f]24 * Arguments 4: ideal i, int k, int l, int m
25 *   k=0: use sparse resultant matrix of Gelfand, Kapranov and Zelevinsky
26 *   k=1: use resultant matrix of Macaulay (k=0 is default)
27 *   l>0: defines precision of fractional part if ground field is Q
28 *   m=0,1,2: number of iterations for approximation of roots (default=2)
[a5f15a]29 * Returns a list containing the roots of the system.
30 */
[da408f]31BOOLEAN nuUResSolve( leftv res, leftv args );
[a5f15a]32
[da408f]33/** returns module representing the multipolynomial resultant matrix
34 * Arguments 2: ideal i, int k
35 *   k=0: use sparse resultant matrix of Gelfand, Kapranov and Zelevinsky
36 *   k=1: use resultant matrix of Macaulay (k=0 is default)
[a5f15a]37 */
38BOOLEAN nuMPResMat( leftv res, leftv arg1, leftv arg2 );
39
40/** find the (complex) roots an univariate polynomial
[e858e7]41 * Determines the roots of an univariate polynomial using Laguerres'
[a5f15a]42 * root-solver. Good for polynomials with low and middle degree (<40).
[da408f]43 * Arguments 3: poly arg1 , int arg2 , int arg3
44 *  arg2>0: defines precision of fractional part if ground field is Q
45 *  arg3: number of iterations for approximation of roots (default=2)
46 * Returns a list of all (complex) roots of the polynomial arg1
[a5f15a]47 */
[da408f]48BOOLEAN nuLagSolve( leftv res, leftv arg1, leftv arg2, leftv arg3 );
[a5f15a]49
50/**
[da408f]51 * COMPUTE: polynomial p with values given by v at points p1,..,pN derived
52 * from p; more precisely: consider p as point in K^n and v as N elements in K,
53 * let p1,..,pN be the points in K^n obtained by evaluating all monomials
54 * of degree 0,1,...,N at p in lexicographical order, then the procedure
55 * computes the polynomial f satisfying f(pi) = v[i]
56 * RETURN:  polynomial f of degree d
[a5f15a]57 */
58BOOLEAN nuVanderSys( leftv res, leftv arg1, leftv arg2, leftv arg3 );
59
60#endif
61
62// local Variables: ***
63// folded-file: t ***
64// compile-command-1: "make installg" ***
65// compile-command-2: "make install" ***
[e858e7]66// End: ***
Note: See TracBrowser for help on using the repository browser.