The Android Open Source Project | 1dc9e47 | 2009-03-03 19:28:35 -0800 | [diff] [blame] | 1 | /* |
| 2 | * cabsf() wrapper for hypotf(). |
| 3 | * |
| 4 | * Written by J.T. Conklin, <jtc@wimsey.com> |
| 5 | * Placed into the Public Domain, 1994. |
| 6 | */ |
| 7 | |
| 8 | #ifndef lint |
| 9 | static const char rcsid[] = |
| 10 | "$FreeBSD: src/lib/msun/src/w_cabsf.c,v 1.3 2001/06/13 15:16:30 ru Exp $"; |
| 11 | #endif /* not lint */ |
| 12 | |
| 13 | #include <complex.h> |
| 14 | #include <math.h> |
| 15 | #include "math_private.h" |
| 16 | |
| 17 | float |
| 18 | cabsf(z) |
| 19 | float complex z; |
| 20 | { |
| 21 | |
| 22 | return hypotf(crealf(z), cimagf(z)); |
| 23 | } |