repo.or.cz
/
musl.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
math: new log2f
[musl.git]
/
src
/
complex
/
clogl.c
blob
88e83e87c92593f85a8cbe370066955d36d922f0
1
#include
"complex_impl.h"
2
3
#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4
long double complex
clogl
(
long double complex
z
)
5
{
6
return
clog
(
z
);
7
}
8
#else
9
// FIXME
10
long double complex
clogl
(
long double complex
z
)
11
{
12
long double
r
,
phi
;
13
14
r
=
cabsl
(
z
);
15
phi
=
cargl
(
z
);
16
return
CMPLXL
(
logl
(
r
),
phi
);
17
}
18
#endif