Changeset f8ace52 in git

Timestamp:

Sep 29, 2010, 11:21:11 AM (13 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'd1ba061a762c62d3a25159d8da8b6e17332291fa')

Children:

08076474d5b872058ae014f8e1e6d95434bc7f29

Parents:

0997b93d0053636ae5ff9b5dc220e421ba6ee70a

Message:

need p_Cleardenom even for gcd(0,f)

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

File:

• kernel/clapsing.cc (modified) (1 diff)

kernel/clapsing.cc

@@ -102 +102 @@
   poly res=NULL;
 
-  if (f!=NULL) 
-  {
-    p_Cleardenom(f, currRing);
-    if (g!=NULL) p_Cleardenom(g, currRing);
-    else         return f; // g==0 => gcd=f (but do a p_Cleardenom)
-  }
-  else /*f==NULL*/ return g; // f==0 => gcd=g (but do a p_Cleardenom)
+  if (f!=NULL) p_Cleardenom(f, currRing);
+  if (g!=NULL) p_Cleardenom(g, currRing);
+  else         return f; // g==0 => gcd=f (but do a p_Cleardenom)
+  if (f==NULL) return g; // f==0 => gcd=g (but do a p_Cleardenom)
 
   res=singclap_gcd_r(f,g,currRing);