home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The C Users' Group Library 1994 August
/
wc-cdrom-cusersgrouplibrary-1994-08.iso
/
listings
/
v_09_08
/
9n08012a
< prev
next >
Wrap
Text File
|
1991-07-10
|
184b
|
9 lines
/* floor function */
#include "xmath.h"
double (floor)(double x)
{ /* compute floor(x) */
return (_Dint(&x, 0) < 0 && x < 0.0 ? x - 1.0 : x);
}