Changeset a86d4c in git for Singular/longrat.cc

Timestamp:

May 2, 2000, 4:55:41 PM (23 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'd0474371d8c5d8068ab70bfb42719c97936b18a6')

Children:

fdd95cae3fd09e17105ef495d37154b1f2dd43fe

Parents:

a269e40905ee7ffce7c3e136ac547cb20459084f

Message:

*hannes: minor optimization:nlMult


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

File:

• Singular/longrat.cc (modified) (3 diffs)

Singular/longrat.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: longrat.cc,v 1.27 2000-03-22 16:34:41 Singular Exp $ */
+/* $Id: longrat.cc,v 1.28 2000-05-02 14:55:41 Singular Exp $ */
 /*
 * ABSTRACT: computation with long rational numbers (Hubert Grassmann)
@@ -1189 +1189 @@
   nlTest(b);
 #endif
+  if (a==INT_TO_SR(0)) return INT_TO_SR(0);
+  if (b==INT_TO_SR(0)) return INT_TO_SR(0);
   if (SR_HDL(a) & SR_HDL(b) & SR_INT)
   {
-    if (a==INT_TO_SR(0)) return INT_TO_SR(0);
-    if (b==INT_TO_SR(0)) return INT_TO_SR(0);
     int r=(SR_HDL(a)-1)*(SR_HDL(b)>>1);
     if ((r/(SR_HDL(b)>>1))==(SR_HDL(a)-1))
@@ -1227 +1227 @@
   else
   {
-    if ((a==INT_TO_SR(0))
-    ||(b==INT_TO_SR(0)))
-      return INT_TO_SR(0);
     u=(number)AllocSizeOf(rnumber);
 #if defined(LDEBUG) && ! defined(HAVE_ASO)