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 |
---|
10 | #include "kernel/spectrum/npolygon.h" |
---|
11 | #include "kernel/spectrum/splist.h" |
---|
12 | |
---|
13 | /*BOOLEAN spectrumProc ( leftv,leftv ); |
---|
14 | BOOLEAN spectrumfProc( leftv,leftv ); |
---|
15 | BOOLEAN spaddProc ( leftv,leftv,leftv ); |
---|
16 | BOOLEAN spmulProc ( leftv,leftv,leftv ); |
---|
17 | BOOLEAN semicProc ( leftv,leftv,leftv ); |
---|
18 | BOOLEAN semicProc3 ( leftv,leftv,leftv,leftv );*/ //TODO move to kernel |
---|
19 | |
---|
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 ); |
---|
25 | //void spectrumPrintError(spectrumState state); |
---|
26 | BOOLEAN ringIsLocal( const ring r); |
---|
27 | |
---|
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); } |
---|
32 | |
---|
33 | |
---|
34 | #endif |
---|
35 | |
---|
36 | // ---------------------------------------------------------------------------- |
---|
37 | // spectrum.h |
---|
38 | // end of file |
---|
39 | // ---------------------------------------------------------------------------- |
---|