diff options
Diffstat (limited to 'contrib/libf2c/libF77/erfc_.c')
-rw-r--r-- | contrib/libf2c/libF77/erfc_.c | 12 |
1 files changed, 4 insertions, 8 deletions
diff --git a/contrib/libf2c/libF77/erfc_.c b/contrib/libf2c/libF77/erfc_.c index f44b1d4..7f3ff8a 100644 --- a/contrib/libf2c/libF77/erfc_.c +++ b/contrib/libf2c/libF77/erfc_.c @@ -1,12 +1,8 @@ #include "f2c.h" -#ifdef KR_headers -double erfc(); -double G77_erfc_0 (x) real *x; -#else -extern double erfc(double); -double G77_erfc_0 (real *x) -#endif +extern double erfc (double); +double +G77_erfc_0 (real * x) { -return( erfc(*x) ); + return (erfc (*x)); } |