Sign in
cobalt
/
cobalt
/
07081467c3d00b04a6a1162e0566a5a8b9cfe2d5
/
.
/
third_party
/
musl
/
src
/
complex
/
clog.c
blob: 12aae9c7e9a02e32f7c68a9a6f98e1218455cca8 [
file
] [
log
] [
blame
]
#include
"libm.h"
// FIXME
/* log(z) = log(|z|) + i arg(z) */
double
complex clog
(
double
complex z
)
{
double
r
,
phi
;
r
=
cabs
(
z
);
phi
=
carg
(
z
);
return
CMPLX
(
log
(
r
),
phi
);
}