double cos (double __x);
double fabs (double __x);
double floor (double __x);
-long _ftol (double fl);
double log (double __x);
double __log2 (double __x);
double pow (double __x, double __y);
return __value;
}
-long _ftol (double fl)
-{
- return (long)fl;
-}
-
double log (double __x)
{
register double __value;