mpz_divisible_p.c

   1 #include <gmp.h>
   2
   3 int mpz_divisible_p (mpz_t N, mpz_t D)
   4 {
   5     int d;
   6     mpz_t r;
   7     mpz_init(r);
   8     mpz_fdiv_r(r, N, D);
   9     d = mpz_sgn(r) == 0;
  10     mpz_clear(r);
  11     return d;
  12 }