diff --git a/lib/libF77/d_lg10.c b/lib/libF77/d_lg10.c index f03ff0043f86..3135881c56a6 100644 --- a/lib/libF77/d_lg10.c +++ b/lib/libF77/d_lg10.c @@ -1,15 +1,13 @@ #include "f2c.h" -#define log10e 0.43429448190325182765 - #ifdef KR_headers -double log(); +double log10(); double d_lg10(x) doublereal *x; #else #undef abs #include "math.h" double d_lg10(doublereal *x) #endif { -return( log10e * log(*x) ); +return( log10(*x) ); }