[35aab3] | 1 | #ifndef MAPS_H |
---|
| 2 | #define MAPS_H |
---|
| 3 | /**************************************** |
---|
| 4 | * Computer Algebra System SINGULAR * |
---|
| 5 | ****************************************/ |
---|
[341696] | 6 | /* $Id$ */ |
---|
[35aab3] | 7 | /* |
---|
| 8 | * ABSTRACT - the mapping of polynomials to other rings |
---|
| 9 | */ |
---|
[0cf29ee] | 10 | #include <coeffs/coeffs.h> |
---|
| 11 | #include <polys/monomials/ring.h> |
---|
| 12 | //#include <kernel/ideals.h> |
---|
[35aab3] | 13 | |
---|
[0cf29ee] | 14 | typedef number (*nMapFunc)(number a, coeffs src, coeffs dst); |
---|
| 15 | struct sip_smap; |
---|
| 16 | typedef struct sip_smap * map; |
---|
| 17 | |
---|
[c6a3eb2] | 18 | poly maEval(map theMap, poly p, ring dst_ring, nMapFunc nMap, ideal s=NULL); |
---|
| 19 | map maCopy(map theMap, const ring dst_ring); |
---|
[35aab3] | 20 | |
---|
[0cf29ee] | 21 | poly maIMap(ring src_ring, ring dst_ring, poly p); |
---|
[35aab3] | 22 | |
---|
[0cf29ee] | 23 | /* |
---|
[35aab3] | 24 | BOOLEAN maApplyFetch(int what,map theMap,leftv res, leftv w, |
---|
| 25 | ring preimage_r, int *perm, |
---|
| 26 | int *par_perm,int P, nMapFunc nMap); |
---|
[0cf29ee] | 27 | */ |
---|
[35aab3] | 28 | void maFindPerm(char **preim_names, int preim_n, char **preim_par, int preim_p, |
---|
| 29 | char **names, int n, char **par, int nop, |
---|
| 30 | int * perm, int *par_perm, int ch); |
---|
| 31 | poly pSubstPoly(poly p, int var, poly image); |
---|
| 32 | ideal idSubstPoly(ideal id, int n, poly e); |
---|
| 33 | |
---|
[294537] | 34 | poly p_MinPolyNormalize(poly p, const ring r); |
---|
[35aab3] | 35 | int maMaxDeg_P(poly p,ring preimage_r); |
---|
| 36 | int maMaxDeg_Ma(ideal a,ring preimage_r); |
---|
| 37 | #endif |
---|