Changeset c97005 in git

Timestamp:

Feb 20, 2006, 4:47:16 PM (18 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

954abc18e35905d98450e84f5a52562d71e4fc81

Parents:

499d931ebb401eac6af5212a954bba0efafebd1c

Message:

*hannes: handle univar. in gcd_poly


git-svn-id: file:///usr/local/Singular/svn/trunk@8965 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• factory/cf_gcd.cc (modified) (2 diffs)

factory/cf_gcd.cc

@@ -1 +1 @@
 /* emacs edit mode for this file is -*- C++ -*- */
-/* $Id: cf_gcd.cc,v 1.41 2006-02-20 15:07:31 Singular Exp $ */
+/* $Id: cf_gcd.cc,v 1.42 2006-02-20 15:47:16 Singular Exp $ */
 
 #include <config.h>
@@ -408 +408 @@
     if ( getCharacteristic() != 0 )
     {
-      if ( f.mvar() != g.mvar() )
+      if ( f.isUnivariate() && g.isUnivariate() )
+      {
+#ifdef HAVE_NTL
+        if ( (isOn(SW_USE_NTL_GCD_P))
+        && isPurePoly(f) && isPurePoly(g))
+           return gcd_poly_univar0(f, g, true);
+#else
+        return gcd_poly_univar0( f, g, true );
+#endif
+      }
+      // now: f or g is not univariate
+      if (f.level() != g.level())
       {
         CFMap M, N;