11dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project/*
21dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project * cabs() wrapper for hypot().
31dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project *
41dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project * Written by J.T. Conklin, <jtc@wimsey.com>
51dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project * Placed into the Public Domain, 1994.
61dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project */
71dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project
81dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project#ifndef lint
91dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Projectstatic const char rcsid[] =
101dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project  "$FreeBSD: src/lib/msun/src/w_cabs.c,v 1.4 2001/06/13 15:16:30 ru Exp $";
111dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project#endif /* not lint */
121dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project
131dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project#include <complex.h>
141dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project#include <math.h>
151dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project
161dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Projectdouble
171dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Projectcabs(z)
181dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project	double complex z;
191dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project{
201dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project	return hypot(creal(z), cimag(z));
211dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project}
221dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project
231dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Projectdouble
241dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Projectz_abs(z)
251dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project	double complex *z;
261dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project{
271dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project	return hypot(creal(*z), cimag(*z));
281dc9e472e19acfe6dc7f41e429236e7eef7ceda1The Android Open Source Project}
29