diff options
Diffstat (limited to 'libm/src/w_cabs.c')
-rw-r--r-- | libm/src/w_cabs.c | 28 |
1 files changed, 0 insertions, 28 deletions
diff --git a/libm/src/w_cabs.c b/libm/src/w_cabs.c deleted file mode 100644 index 577e5e0..0000000 --- a/libm/src/w_cabs.c +++ /dev/null @@ -1,28 +0,0 @@ -/* - * cabs() wrapper for hypot(). - * - * Written by J.T. Conklin, <jtc@wimsey.com> - * Placed into the Public Domain, 1994. - */ - -#ifndef lint -static const char rcsid[] = - "$FreeBSD: src/lib/msun/src/w_cabs.c,v 1.4 2001/06/13 15:16:30 ru Exp $"; -#endif /* not lint */ - -#include <complex.h> -#include <math.h> - -double -cabs(z) - double complex z; -{ - return hypot(creal(z), cimag(z)); -} - -double -z_abs(z) - double complex *z; -{ - return hypot(creal(*z), cimag(*z)); -} |