Trailing-Edge
-
PDP-10 Archives
-
SRI_NIC_PERM_FS_1_19910112
-
kcc-6/lib/math/ceil.c
There are 7 other files named ceil.c in the archive. Click here to see a list.
/*
* CEIL.C - ceiling function for math library
*
* (c) Copyright Ken Harrenstien 1989
* for all changes after v.8, 12-Apr-1988
* (c) Copyright Ian Macky, SRI International 1985
*
* This code conforms with the description of the ceil() function
* as defined in Harbison and Steele's "C: A Reference Manual",
* section 11.3.6
*/
#include <math.h>
double ceil(x)
double x;
{
double ipart;
if (modf(x, &ipart) > 0) /* if x has a fractional part, */
ipart++; /* bump up to next highest integer */
return ipart;
}