47{
51
54 {
56 {
59 for(
i=strat->
sl;
i>0;
i--)
60 {
62 }
63 for(
i=strat->
ak;
i>0;
i--)
64 {
66 {
68 return;
69 }
70 }
72 }
74
75
77
84 {
86 {
88 {
92 }
93 else
95 }
96 else
97 {
100 else
101 {
103 {
106 {
109 }
111 }
113 return;
114 }
115 }
117 break;
119 return;
120 deg++;
121 }
124 {
127 {
130 }
132 }
133 }
134}
#define BIMATELEM(M, I, J)
static FORCE_INLINE long n_Int(number &n, const coeffs r)
conversion of n to an int; 0 if not possible in Z/pZ: the representing int lying in (-p/2 ....
static FORCE_INLINE number n_Sub(number a, number b, const coeffs r)
return the difference of 'a' and 'b', i.e., a-b
const CanonicalForm int s
bigintmat * hFirstSeries0b(ideal I, ideal Q, intvec *wdegree, intvec *shifts, const ring src, const coeffs biv_cf)
long kHomModDeg(poly p, const ring r)
long kModDeg(poly p, const ring r)
void deleteInL(LSet set, int *length, int j, kStrategy strat)
static long p_Totaldegree(poly p, const ring r)
VAR ring currRing
Widely used global variable which specifies the current polynomial ring for Singular interpreter and ...
#define pGetComp(p)
Component.
void PrintS(const char *s)
long(* pFDegProc)(poly p, ring r)
int status int void size_t count