Changeset 414cce5 in git

Timestamp:

Apr 3, 2018, 3:00:26 PM (5 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')

Children:

ef16321550021966aa0ef64dab3a1a288e2b1d81

Parents:

48eb3428757e54031dcc535e19b84750bf82612b

Message:

fix: n_IsZeroDivisor

File:

• libpolys/coeffs/numbers.cc (modified) (1 diff)

libpolys/coeffs/numbers.cc

@@ -145 +145 @@
 BOOLEAN n_IsZeroDivisor( number a, const coeffs r)
 {
+  BOOLEAN ret = n_IsZero(a, r);
   int c = n_GetChar(r);
-  BOOLEAN ret = n_IsZero(a, r);
-  if( (c != 0) && !ret )
-  {
-    number ch = n_Init( c, r );
-    number g = n_Gcd( ch, a, r );
-    ret = !n_IsOne (g, r);
-    n_Delete(&ch, r);
-    n_Delete(&g, r);
-  }
+  if (ret || (c==0) || (r->is_field))
+    return ret; /*n_IsZero(a, r)*/
+  number ch = n_Init( c, r );
+  number g = n_Gcd( ch, a, r );
+  ret = !n_IsOne (g, r);
+  n_Delete(&ch, r);
+  n_Delete(&g, r);
   return ret;
 }