[35aab3] | 1 | #ifndef WEIGHT_H |
---|
| 2 | #define WEIGHT_H |
---|
| 3 | /**************************************** |
---|
| 4 | * Computer Algebra System SINGULAR * |
---|
| 5 | ****************************************/ |
---|
| 6 | /* |
---|
| 7 | * ABSTRACT |
---|
| 8 | */ |
---|
| 9 | |
---|
[aadd638] | 10 | #include "polys/monomials/ring.h" |
---|
[35aab3] | 11 | |
---|
[a3f0fea] | 12 | EXTERN_VAR short * ecartWeights; |
---|
[f550e86] | 13 | //extern pFDegProc pFDegOld; |
---|
| 14 | //extern pLDegProc pLDegOld; |
---|
[35aab3] | 15 | |
---|
[494884] | 16 | void kEcartWeights(poly* s, int sl, short *eweight, const ring R); |
---|
[f550e86] | 17 | //BOOLEAN kWeight(leftv res,leftv id); |
---|
| 18 | //BOOLEAN kQHWeight(leftv res,leftv v); |
---|
| 19 | long maxdegreeWecart(poly p,int *l, ring r); |
---|
| 20 | long totaldegreeWecart(poly p, ring r); |
---|
[33b097] | 21 | long totaldegreeWecart_IV(poly p, ring r, const int *w); |
---|
[35aab3] | 22 | |
---|
[33b097] | 23 | int * iv2array(intvec * iv, const ring R); |
---|
[35aab3] | 24 | |
---|
| 25 | // internal: |
---|
[aa4d31] | 26 | extern "C" THREAD_VAR double (*wFunctional)(int *degw, int *lpol, int npol, |
---|
[6aacb6] | 27 | double *rel, double wx, double wNsqr); |
---|
[0d9242] | 28 | double wFunctionalBuch(int *degw, int *lpol, int npol, |
---|
[6aacb6] | 29 | double *rel, double wx, double wNsqr); |
---|
[494884] | 30 | void wCall(poly* s, int sl, int *x, double wNsqr, const ring R); |
---|
[35aab3] | 31 | |
---|
| 32 | #endif |
---|
| 33 | |
---|