[35aab3] | 1 | // ---------------------------------------------------------------------------- |
---|

| 2 | // spectrum.h |
---|

| 3 | // begin of file |
---|

| 4 | // Stephan Endrass, endrass@mathematik.uni-mainz.de |
---|

| 5 | // 23.7.99 |
---|

| 6 | // ---------------------------------------------------------------------------- |
---|

| 7 | |
---|

| 8 | #ifndef SPECTRUM_H |
---|

| 9 | #define SPECTRUM_H |
---|

[599326] | 10 | #include <kernel/npolygon.h> |
---|

| 11 | #include <kernel/splist.h> |
---|

[35aab3] | 12 | |
---|

[f599a46] | 13 | /*BOOLEAN spectrumProc ( leftv,leftv ); |
---|

[35aab3] | 14 | BOOLEAN spectrumfProc( leftv,leftv ); |
---|

| 15 | BOOLEAN spaddProc ( leftv,leftv,leftv ); |
---|

| 16 | BOOLEAN spmulProc ( leftv,leftv,leftv ); |
---|

| 17 | BOOLEAN semicProc ( leftv,leftv,leftv ); |
---|

[f599a46] | 18 | BOOLEAN semicProc3 ( leftv,leftv,leftv,leftv );*/ //TODO move to kernel |
---|

| 19 | |
---|

[3835a88] | 20 | BOOLEAN hasTermOfDegree( poly h, int d, const ring r ); |
---|

| 21 | int hasOne( ideal J, const ring r ); |
---|

| 22 | BOOLEAN hasAxis( ideal J,int k, const ring r ); |
---|

| 23 | poly computeWC( const newtonPolygon &np,Rational max_weight, const ring r ); |
---|

| 24 | void computeNF( ideal stdJ,poly hc,poly wc,spectrumPolyList *NF, const ring r ); |
---|

[f599a46] | 25 | //void spectrumPrintError(spectrumState state); |
---|

[3835a88] | 26 | BOOLEAN ringIsLocal( const ring r); |
---|

[35aab3] | 27 | |
---|

[3835a88] | 28 | BOOLEAN inline hasConstTerm( poly h, const ring r ) |
---|

| 29 | { return hasTermOfDegree(h,0,r); } |
---|

| 30 | BOOLEAN inline hasLinearTerm( poly h, const ring r ) |
---|

| 31 | { return hasTermOfDegree(h,1,r); } |
---|

[35aab3] | 32 | |
---|

| 33 | |
---|

| 34 | #endif |
---|

| 35 | |
---|

| 36 | // ---------------------------------------------------------------------------- |
---|

| 37 | // spectrum.h |
---|

| 38 | // end of file |
---|

| 39 | // ---------------------------------------------------------------------------- |
---|