double
fabs(double val)
{
	if (val > 0) {
		return val;
	} else {
		return -val;
	}
}