summaryrefslogtreecommitdiff
path: root/mpz/fac_ui.c
diff options
context:
space:
mode:
authorKevin Ryde <user42@zip.com.au>2003-03-25 23:53:27 +0100
committerKevin Ryde <user42@zip.com.au>2003-03-25 23:53:27 +0100
commit60912f101c6c100c402ecf27e6d1e2eeee9ec2d0 (patch)
tree3ac04cedbf5df6be606a4b593bc3d1802fe65f51 /mpz/fac_ui.c
parent76bce1070b1481e95c30807ba8f153a876312078 (diff)
downloadgmp-60912f101c6c100c402ecf27e6d1e2eeee9ec2d0.tar.gz
* mpz/fac_ui.c: Remove unused variable "z1".
Diffstat (limited to 'mpz/fac_ui.c')
-rw-r--r--mpz/fac_ui.c7
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));