summaryrefslogtreecommitdiffstats
path: root/contrib/libf2c/libF77/r_lg10.c
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/libf2c/libF77/r_lg10.c')
-rw-r--r--contrib/libf2c/libF77/r_lg10.c10
1 files changed, 3 insertions, 7 deletions
diff --git a/contrib/libf2c/libF77/r_lg10.c b/contrib/libf2c/libF77/r_lg10.c
index 51f84201..563e73c 100644
--- a/contrib/libf2c/libF77/r_lg10.c
+++ b/contrib/libf2c/libF77/r_lg10.c
@@ -2,14 +2,10 @@
#define log10e 0.43429448190325182765
-#ifdef KR_headers
-double log();
-double r_lg10(x) real *x;
-#else
#undef abs
#include <math.h>
-double r_lg10(real *x)
-#endif
+double
+r_lg10 (real * x)
{
-return( log10e * log(*x) );
+ return (log10e * log (*x));
}
OpenPOWER on IntegriCloud