home *** CD-ROM | disk | FTP | other *** search
/ Aminet 6 / Aminet 6 - June 1995.iso / Aminet / dev / gcc / libnixV0_8.lha / gnu / libnix-sources.lha / sources / math / trans / fmod.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-12-12  |  304 b   |  18 lines
  1. #ifdef __GNUC__
  2. #include <inline/mathieeedoubbas.h>
  3. #endif
  4.  
  5. static inline double floor(double x)
  6. { return IEEEDPFloor(x); }
  7.  
  8. static inline double ceil(double x)
  9. { return IEEEDPCeil(x); }
  10.  
  11. double fmod(double x,double y)
  12. { double a=x/y;
  13.   if(a>=0)
  14.     return x-y*floor(a);
  15.   else
  16.     return x-y*ceil(a);
  17. }
  18.