1 files changed, 3 insertions, 7 deletions
diff --git a/contrib/libf2c/libF77/r_tanh.c b/contrib/libf2c/libF77/r_tanh.c
index 818c6a8..6f2552a 100644
--- a/contrib/libf2c/libF77/r_tanh.c
+++ b/contrib/libf2c/libF77/r_tanh.c
@@ -1,13 +1,9 @@
 #include "f2c.h"
 
-#ifdef KR_headers
-double tanh();
-double r_tanh(x) real *x;
-#else
 #undef abs
 #include <math.h>
-double r_tanh(real *x)
-#endif
+double
+r_tanh (real * x)
 {
-return( tanh(*x) );
+  return (tanh (*x));
 }