Return to fabs.c CVS log

Up to [MW Coherent from dump] / coherent / b / lib / libm

coherent

/*
 * Floating absolute value.
 */
#include <math.h>

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

double
fabs(x)
double x;
{
	if (x < 0.0)
		x = -x;
	return (x);
}

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