diff options
author | Kevin Ryde <user42@zip.com.au> | 2003-03-25 23:53:27 +0100 |
---|---|---|
committer | Kevin Ryde <user42@zip.com.au> | 2003-03-25 23:53:27 +0100 |
commit | 60912f101c6c100c402ecf27e6d1e2eeee9ec2d0 (patch) | |
tree | 3ac04cedbf5df6be606a4b593bc3d1802fe65f51 /mpz/fac_ui.c | |
parent | 76bce1070b1481e95c30807ba8f153a876312078 (diff) | |
download | gmp-60912f101c6c100c402ecf27e6d1e2eeee9ec2d0.tar.gz |
* mpz/fac_ui.c: Remove unused variable "z1".
Diffstat (limited to 'mpz/fac_ui.c')
-rw-r--r-- | mpz/fac_ui.c | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/mpz/fac_ui.c b/mpz/fac_ui.c index 954d4b0e0..f676c6d20 100644 --- a/mpz/fac_ui.c +++ b/mpz/fac_ui.c @@ -1,7 +1,7 @@ /* mpz_fac_ui(result, n) -- Set RESULT to N!. -Copyright 1991, 1993, 1994, 1995, 2000, 2001, 2002 Free Software Foundation, -Inc. +Copyright 1991, 1993, 1994, 1995, 2000, 2001, 2002, 2003 Free Software +Foundation, Inc. This file is part of the GNU MP Library. @@ -112,7 +112,7 @@ void mpz_fac_ui (mpz_ptr x, unsigned long n) { - unsigned long z, z1, stt; + unsigned long z, stt; int i, j; mpz_t t1, st[8 * sizeof (unsigned long) + 1 - APCONST]; mp_limb_t d[4]; @@ -140,7 +140,6 @@ mpz_fac_ui (mpz_ptr x, unsigned long n) /* d[1] is 2n/e , d[0] ignored */ count_leading_zeros (z, d[1]); z = GMP_LIMB_BITS - z - 1; /* z=floor(log_2(2n/e)) */ - z1 = z - 1; /* z1=floor(log_2(n/e)) */ umul_ppmm (d[1], d[0], (mp_limb_t) n, (mp_limb_t) z); /* d=n*floor(log_2(2n/e)) */ d[0] = (d[0] >> 2) | (d[1] << (GMP_LIMB_BITS - 2)); |