Changeset 41072b in git

Timestamp:

Oct 11, 2011, 2:03:55 PM (12 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a657104b677b4c461d018cbf3204d72d34ad66a9')

Children:

3e70950f6eff7e879a05817dd9e4bb45aeb175ca

Parents:

0fd6d8111bc8e9daf631bcceb78381f4561becbb

Message:

minor simplification for int_rat

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

File:

• factory/int_rat.cc (modified) (6 diffs)

factory/int_rat.cc

@@ -54 +54 @@
     {
         int g = intgcd( n, d );
-        if ( d < 0 )
-        {
-            mpz_init_set_si( &_num, -n / g );
-            mpz_init_set_si( &_den, -d / g );
-        }
-        else
-        {
-            mpz_init_set_si( &_num, n / g );
-            mpz_init_set_si( &_den, d / g );
-        }
+        if ( d < 0 ) g= -g;
+        mpz_init_set_si( &_num, n / g );
+        mpz_init_set_si( &_den, d / g );
     }
 }
@@ -200 +193 @@
     if ( mpz_cmp_si( &g, 1 ) == 0 )
     {
-        mpz_mul( &n, &_den, &MPQNUM( c ) );
-        mpz_mul( &g, &_num, &MPQDEN( c ) );
-        mpz_add( &n, &n, &g );
-        mpz_mul( &d, &_den, &MPQDEN( c ) );
-    }
-    else
-    {
-        MP_INT tmp1;
-        MP_INT tmp2;
-        mpz_init( &tmp1 );
-        mpz_divexact( &tmp1, &_den, &g );
-        mpz_init( &tmp2 );
-        mpz_divexact( &tmp2, &MPQDEN( c ), &g );
-        mpz_mul( &d, &tmp2, &_den );
-        mpz_mul( &tmp2, &tmp2, &_num );
-        mpz_mul( &tmp1, &tmp1, &MPQNUM( c ) );
-        mpz_add( &n, &tmp1, &tmp2 );
-        mpz_gcd( &g, &n, &d );
-        if ( mpz_cmp_si( &g, 1 ) != 0 )
-        {
-            mpz_divexact( &n, &n, &g );
-            mpz_divexact( &d, &d, &g );
-        }
-        mpz_clear( &tmp1 );
-        mpz_clear( &tmp2 );
+      mpz_mul( &n, &_den, &MPQNUM( c ) );
+      mpz_mul( &g, &_num, &MPQDEN( c ) );
+      mpz_add( &n, &n, &g );
+      mpz_mul( &d, &_den, &MPQDEN( c ) );
+    }
+    else
+    {
+      MP_INT tmp1;
+      MP_INT tmp2;
+      mpz_init( &tmp1 );
+      mpz_divexact( &tmp1, &_den, &g );
+      mpz_init( &tmp2 );
+      mpz_divexact( &tmp2, &MPQDEN( c ), &g );
+      mpz_mul( &d, &tmp2, &_den );
+      mpz_mul( &tmp2, &tmp2, &_num );
+      mpz_mul( &tmp1, &tmp1, &MPQNUM( c ) );
+      mpz_add( &n, &tmp1, &tmp2 );
+      mpz_gcd( &g, &n, &d );
+      if ( mpz_cmp_si( &g, 1 ) != 0 )
+      {
+          mpz_divexact( &n, &n, &g );
+          mpz_divexact( &d, &d, &g );
+      }
+      mpz_clear( &tmp1 );
+      mpz_clear( &tmp2 );
     }
     mpz_clear( &g );
@@ -230 +223 @@
     if ( mpz_cmp_si( &d, 1 ) == 0 )
     {
-        mpz_clear( &d );
-        if ( mpz_is_imm( &n ) )
-        {
-            InternalCF * res = int2imm( mpz_get_si( &n ) );
-            mpz_clear( &n );
-            return res;
-        }
-        else
-        {
-            return new InternalInteger( n );
-        }
-    }
-    else
-        return new InternalRational( n, d );
+      mpz_clear( &d );
+      if ( mpz_is_imm( &n ) )
+      {
+          InternalCF * res = int2imm( mpz_get_si( &n ) );
+          mpz_clear( &n );
+          return res;
+      }
+      else
+      {
+          return new InternalInteger( n );
+      }
+    }
+    else
+    {
+      return new InternalRational( n, d );
+    }
 }
 
@@ -306 +301 @@
     ASSERT( ! ::is_imm( c ) && c->levelcoeff() == RationalDomain, "illegal domain" );
     MP_INT n, d;
+    mpz_init( &n ); mpz_init( &d );
 
     if ( this == c )
     {
-        mpz_init( &n ); mpz_init( &d );
         mpz_mul( &n, &_num, &_num );
         mpz_mul( &d, &_den, &_den );
@@ -317 +312 @@
         MP_INT g1, g2, tmp1, tmp2;
         mpz_init( &g1 ); mpz_init( &g2 );
-        mpz_init( &n ); mpz_init( &d );
         mpz_gcd( &g1, &_num, &MPQDEN( c ) );
         mpz_gcd( &g2, &_den, &MPQNUM( c ) );
@@ -523 +517 @@
         if ( cc == 0 )
             return this;
-        else  if ( cc < 0 )
-        {
-            mpz_init( &n );
+        else
+        {
+          mpz_init( &n );
+          if ( cc < 0 )
+          {
             mpz_mul_ui( &n, &_den, -cc );
             mpz_sub( &n, &_num, &n );
-        }
-        else
-        {
-            mpz_init( &n );
+          }
+          else
+          {
             mpz_mul_ui( &n, &_den, cc );
             mpz_add( &n, &_num, &n );
-        }
+          }
+        }
     }
     else