Research V7 development

[unix-history] / usr / src / libm / fabs.c

double
fabs(arg)
double arg;
{

       if(arg < 0.)
               arg = -arg;
       return(arg);
}