Changeset 64a501 in git for factory/cf_gcd.cc

Timestamp:

Jul 25, 2011, 1:59:06 PM (13 years ago)

Author:

Martin Lee <martinlee84@…>

Branches:

(u'spielwiese', '4a9821a93ffdc22a6696668bd4f6b8c9de3e6c5f')

Children:

21b8f4cad82601dd1e18c8bf2923808fb6827958

Parents:

22071069039f22a2772d1e4d329f934d243f95da

Message:

deleted unnecessary fdivides


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

File:

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

factory/cf_gcd.cc

@@ -1020 +1020 @@
                 CanonicalForm d;
 #if 1
-                do{ d = gcd_poly( f, g ); }
-                while ((!fdivides(d,f)) || (!fdivides(d,g)));
+                d = gcd_poly( f, g );
 #else
-                while(1)
-                {
-                  d = gcd_poly( f, g );
-                  if ((fdivides(d,f)) && (fdivides(d,g))) break;
-                  printf("g"); fflush(stdout);
-                }
+                d = gcd_poly( f, g );
+                printf("g"); fflush(stdout);
 #endif
                 return abs( d );
@@ -1041 +1036 @@
                 CanonicalForm F = f * l, G = g * l;
                 Off( SW_RATIONAL );
-                do { l = gcd_poly( F, G ); }
-                while ((!fdivides(l,F)) || (!fdivides(l,G)));
+                l = gcd_poly( F, G );
                 On( SW_RATIONAL );
                 return abs( l );