Sign in
cobalt
/
cobalt
/
527110903c994f57b3fc64852b74e941d515b683
/
.
/
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
);
}