# Singular/Sources

fix: #329, part 1: alg. ext

• Loading branch information...
hannes14 committed Jun 25, 2012
1 parent eea50a6 commit afda228e98d9cb285f30c2bb20125b83462b7ecd
Showing with 15 additions and 8 deletions.
1. +15 −8 libpolys/polys/ext_fields/algext.cc
 @@ -274,17 +274,24 @@ int naInt(number &a, const coeffs cf) return n_Int(p_GetCoeff(aAsPoly, naRing), naCoeffs); } -/* TRUE iff (a != 0 and (b == 0 or deg(a) > deg(b))) */ +/* TRUE iff (a != 0 and (b == 0 or deg(a) > deg(b) or (deg(a)==deg(b) && lc(a)>lc(b))) */ BOOLEAN naGreater(number a, number b, const coeffs cf) { naTest(a); naTest(b); - if (naIsZero(a, cf)) return FALSE; - if (naIsZero(b, cf)) return TRUE; - int aDeg = 0; - if (a != NULL) aDeg = p_Totaldegree((poly)a, naRing); - int bDeg = 0; - if (b != NULL) bDeg = p_Totaldegree((poly)b, naRing); - return (aDeg > bDeg); + if (naIsZero(a, cf)) + { + if (naIsZero(b, cf)) return FALSE; + return !n_GreaterZero(pGetCoeff((poly)b),cf); + } + if (naIsZero(b, cf)) + { + return n_GreaterZero(pGetCoeff((poly)a),cf); + } + int aDeg = p_Totaldegree((poly)a, naRing); + int bDeg = p_Totaldegree((poly)b, naRing); + if (aDeg>bDeg) return TRUE; + if (aDeg 0 or deg(a) > 0) */

#### 0 comments on commit `afda228`

Please sign in to comment.