File:  [MW Coherent from dump] / coherent / b / lib / libm / floor.c
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Wed May 29 04:56:35 2019 UTC (7 years ago) by root
Branches: MarkWilliams, MAIN
CVS tags: relic, HEAD
coherent

/*
 * libm/floor.c
 * Floor.
 */

#include <math.h>

#if	EMU87
#include "emumath.h"
#endif

double
floor(x) double x;
{
	double r;

	return (modf(x, &r) < 0.0) ? r - 1.0 : r;
}

/* end of libm/floor.c */

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.