Esempio n. 1
0
ieee754dp ieee754dp_trunc(ieee754dp x)
{
	ieee754dp i;

	(void) ieee754dp_modf(x, &i);
	return i;
}
Esempio n. 2
0
ieee754dp ieee754dp_floor(ieee754dp x)
{
	ieee754dp i;

	if (ieee754dp_lt(ieee754dp_modf(x, &i), ieee754dp_zero(0)))
		return ieee754dp_sub(i, ieee754dp_one(0));
	else
		return i;
}
Esempio n. 3
0
ieee754dp ieee754dp_ceil(ieee754dp x)
{
	ieee754dp i;

	if (ieee754dp_gt(ieee754dp_modf(x, &i), ieee754dp_zero(0)))
		return ieee754dp_add(i, ieee754dp_one(0));
	else
		return i;
}
Esempio n. 4
0
double
modf (double d, double *ipart)
{
    ieee754dp sd, sipart, srv;

    sd.d = d;
    srv = ieee754dp_modf(sd, &sipart);
    *ipart = sipart.d;
    return srv.d;
}