diff options
| author | Bruce Evans <bde@FreeBSD.org> | 1997-03-03 14:52:07 +0000 |
|---|---|---|
| committer | Bruce Evans <bde@FreeBSD.org> | 1997-03-03 14:52:07 +0000 |
| commit | 66b24d028dcb26ed373478fa84ad66874a678f10 (patch) | |
| tree | 898d03563901d82852052b5b3a4acf6968dafc75 /lib/libF77 | |
| parent | 331f06654c29ecef1d4b1ae555152dd07b0af92e (diff) | |
Notes
Diffstat (limited to 'lib/libF77')
| -rw-r--r-- | lib/libF77/d_lg10.c | 6 |
1 files changed, 2 insertions, 4 deletions
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,9 +1,7 @@ #include "f2c.h" -#define log10e 0.43429448190325182765 - #ifdef KR_headers -double log(); +double log10(); double d_lg10(x) doublereal *x; #else #undef abs @@ -11,5 +9,5 @@ double d_lg10(x) doublereal *x; double d_lg10(doublereal *x) #endif { -return( log10e * log(*x) ); +return( log10(*x) ); } |