Gitiles
Code Review
Sign In
gerrit-public.fairphone.software
/
platform
/
external
/
musl
/
29f3202b731185d993a399f04d2f3e3f78db5a81
/
.
/
src
/
complex
/
cabsl.c
blob: 40a067c1c59f182d7d96957a3286e4dace5e5449 [
file
] [
log
] [
blame
]
#include
"libm.h"
#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
long
double
cabsl
(
long
double
complex z
)
{
return
cabs
(
z
);
}
#else
long
double
cabsl
(
long
double
complex z
)
{
return
hypotl
(
creall
(
z
),
cimagl
(
z
));
}
#endif