minix/lib/math/fmod.c

35 lines
507 B
C
Raw Normal View History

2005-04-21 16:53:53 +02:00
/*
* (c) copyright 1988 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*
* Author: Hans van Eck
*/
/* $Header$ */
#include <math.h>
#include <errno.h>
double
fmod(double x, double y)
{
long i;
double val;
double frac;
if (y == 0) {
errno = EDOM;
return 0;
}
frac = modf( x / y, &val);
return frac * y;
/*
val = x / y;
if (val > LONG_MIN && val < LONG_MAX) {
i = val;
return x - i * y;
}
*/
}