diff options
Diffstat (limited to 'contrib/libf2c/libF77/derfc_.c')
-rw-r--r-- | contrib/libf2c/libF77/derfc_.c | 13 |
1 files changed, 4 insertions, 9 deletions
diff --git a/contrib/libf2c/libF77/derfc_.c b/contrib/libf2c/libF77/derfc_.c index ae1ac74..78e8e88 100644 --- a/contrib/libf2c/libF77/derfc_.c +++ b/contrib/libf2c/libF77/derfc_.c @@ -1,14 +1,9 @@ #include "f2c.h" -#ifdef KR_headers -extern double erfc(); +extern double erfc (double); -double G77_derfc_0 (x) doublereal *x; -#else -extern double erfc(double); - -double G77_derfc_0 (doublereal *x) -#endif +double +G77_derfc_0 (doublereal * x) { -return( erfc(*x) ); + return (erfc (*x)); } |