213{
215
218
220
221 #ifndef OM_NDEBUG
222 #ifndef X_OMALLOC
223
226 #endif
227 #endif
228
230
231
232 #ifndef OM_NDEBUG
235 #endif
236
238
240 {
241
243 #ifndef OM_NDEBUG
244 #ifndef X_OMALLOC
245
248 #endif
249 #endif
250
252
253 #ifdef LDEBUG
255 #endif
257
258
260
262
263
265 {
266 long c1, cc1, ccc1, ec1;
268
270 if (o->
data.syzcomp.Components!=
NULL)
271 {
272 cc1 = o->
data.syzcomp.Components[c1];
273 ccc1 = o->
data.syzcomp.ShiftedComponents[cc1];
274 }
275 else { cc1=0; ccc1=0; }
278 ec1 =
p->exp[o->
data.syzcomp.place];
279
280 if (ec1 != ccc1)
281 {
284 }
285 }
286
287
289 {
293 }
294
295
297 {
299 if (cmp == 0)
300 {
302 }
303 else
305
306
308 {
310 for (
i=r->N;
i>0;
i--)
311 {
313 }
315 }
316 }
319 }
321}
#define n_Test(a, r)
BOOLEAN n_Test(number a, const coeffs r)
static FORCE_INLINE BOOLEAN n_IsZero(number n, const coeffs r)
TRUE iff 'n' represents the zero element.
static FORCE_INLINE int n_GetChar(const coeffs r)
Return the characteristic of the coeff. domain.
#define pFalseReturn(cond)
#define _pPolyAssumeReturnMsg(cond, msg, p, r)
#define omSizeWOfBin(bin_ptr)
#define omTestList(ptr, level)
static poly p_DebugInit(poly p, ring src_ring, ring dest_ring)
BOOLEAN dPolyReportError(poly p, ring r, const char *fmt,...)
BOOLEAN p_CheckRing(ring r)
BOOLEAN p_LmCheckIsFromRing(poly p, ring r)
static BOOLEAN p_ExpVectorEqual(poly p1, poly p2, const ring r1, const ring r2)
static int p_LmCmp(poly p, poly q, const ring r)
static long p_GetExp(const poly p, const unsigned long iBitmask, const int VarOffset)
get a single variable exponent @Note: the integer VarOffset encodes:
static void p_LmFree(poly p, ring)
#define omTestBinAddrSize(A, B, C)