| version 1.1.1.2, 2000/09/09 14:12:51 |
version 1.1.1.3, 2000/12/01 05:45:08 |
|
|
| /* mpz_fdiv_r_2exp -- Divide a integer by 2**CNT and produce a remainder. |
/* mpz_fdiv_r_2exp -- Divide a integer by 2**CNT and produce a remainder. |
| |
|
| Copyright (C) 1991, 1993, 1994, 1995, 1998, 1999 Free Software Foundation, |
Copyright (C) 1991, 1993, 1994, 1995, 1998, 1999, 2000 Free Software |
| Inc. |
Foundation, Inc. |
| |
|
| This file is part of the GNU MP Library. |
This file is part of the GNU MP Library. |
| |
|
| Line 83 mpz_fdiv_r_2exp (res, in, cnt) |
|
| Line 83 mpz_fdiv_r_2exp (res, in, cnt) |
|
| { |
{ |
| /* Result should be 2^CNT - RES */ |
/* Result should be 2^CNT - RES */ |
| mpz_t tmp; |
mpz_t tmp; |
| |
TMP_DECL (marker); |
| |
TMP_MARK (marker); |
| MPZ_TMP_INIT (tmp, cnt/BITS_PER_MP_LIMB + 2); |
MPZ_TMP_INIT (tmp, cnt/BITS_PER_MP_LIMB + 2); |
| mpz_set_ui (tmp, 1L); |
mpz_set_ui (tmp, 1L); |
| mpz_mul_2exp (tmp, tmp, cnt); |
mpz_mul_2exp (tmp, tmp, cnt); |
| mpz_sub (res, tmp, res); |
mpz_sub (res, tmp, res); |
| |
TMP_FREE (marker); |
| } |
} |
| } |
} |
| |
|
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to fdiv_r_2exp.c CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM_contrib / gmp / mpz