Hi, I am contributing the following function:
long double
mpz_get_ld (mpz_t z)
{
double h, l;
mpz_t tmp;
h = mpz_get_d (z);
mpz_init (tmp);
mpz_set_d (tmp, h);
mpz_sub (tmp, tmp, z);
l = mpz_get_d (tmp);
mpz_clear (tmp);
return (long double) h + (long double) l;
}
Paul
_______________________________________________
gmp-devel mailing list
gmp-devel@gmplib.org
http://gmplib.org/mailman/listinfo/gmp-devel
