/contrib/groff/src/libs/libgroff/fmod.c

https://bitbucket.org/freebsd/freebsd-head/ · C · 28 lines · 7 code · 3 blank · 18 comment · 0 complexity · eaef4c7be47a94036ae147d268fafeb0 MD5 · raw file

  1. /* Copyright (C) 1989, 1990, 1991, 1992 Free Software Foundation, Inc.
  2. Written by James Clark (jjc@jclark.com)
  3. This file is part of groff.
  4. groff is free software; you can redistribute it and/or modify it under
  5. the terms of the GNU General Public License as published by the Free
  6. Software Foundation; either version 2, or (at your option) any later
  7. version.
  8. groff is distributed in the hope that it will be useful, but WITHOUT ANY
  9. WARRANTY; without even the implied warranty of MERCHANTABILITY or
  10. FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
  11. for more details.
  12. You should have received a copy of the GNU General Public License along
  13. with groff; see the file COPYING. If not, write to the Free Software
  14. Foundation, 51 Franklin St - Fifth Floor, Boston, MA 02110-1301, USA. */
  15. #include <math.h>
  16. double fmod(x, y)
  17. double x, y;
  18. {
  19. double quot = x/y;
  20. return x - (quot < 0.0 ? ceil(quot) : floor(quot)) * y;
  21. }