diff options
| author | Bruce Evans <bde@FreeBSD.org> | 1997-02-16 17:55:41 +0000 |
|---|---|---|
| committer | Bruce Evans <bde@FreeBSD.org> | 1997-02-16 17:55:41 +0000 |
| commit | 319ad1705e37656d13112180083a4fe391d0eb41 (patch) | |
| tree | ded786ac05969dfa6e995f8d190c9812e4e556a2 /lib/libF77 | |
| parent | 4b4336a91dd5d2654ddd9ac6c7f3538a9c9983a6 (diff) | |
Notes
Diffstat (limited to 'lib/libF77')
| -rw-r--r-- | lib/libF77/r_lg10.c | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lib/libF77/r_lg10.c b/lib/libF77/r_lg10.c index 4ea02f451003..87013aec41d2 100644 --- a/lib/libF77/r_lg10.c +++ b/lib/libF77/r_lg10.c @@ -1,7 +1,5 @@ #include "f2c.h" -#define log10e 0.43429448190325182765 - #ifdef KR_headers double log(); double r_lg10(x) real *x; @@ -11,5 +9,5 @@ double r_lg10(x) real *x; double r_lg10(real *x) #endif { -return( log10e * log(*x) ); +return( log10(*x) ); } |