diff options
Diffstat (limited to 'libf2c/libF77/z_sqrt.c')
| -rw-r--r-- | libf2c/libF77/z_sqrt.c | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/libf2c/libF77/z_sqrt.c b/libf2c/libF77/z_sqrt.c index c04e8f0..94560ed 100644 --- a/libf2c/libF77/z_sqrt.c +++ b/libf2c/libF77/z_sqrt.c @@ -1,14 +1,9 @@ #include "f2c.h" -#ifdef KR_headers -double sqrt(), f__cabs(); -VOID z_sqrt(r, z) doublecomplex *r, *z; -#else #undef abs #include "math.h" extern double f__cabs(double, double); void z_sqrt(doublecomplex *r, doublecomplex *z) -#endif { double mag, zi = z->i, zr = z->r; |