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