Sign in
fuchsia
/
zircon
/
/
13ee3dc5e4c46bf127977ad28645c47442ec517d
/
.
/
third_party
/
ulib
/
musl
/
src
/
complex
/
casinf.c
blob: c591fef00da064ab4a2d291a3afe05acf584f7ea [
file
] [
log
] [
blame
]
#include
"libm.h"
// FIXME
float
complex casinf
(
float
complex z
)
{
float
complex w
;
float
x
,
y
;
x
=
crealf
(
z
);
y
=
cimagf
(
z
);
w
=
CMPLXF
(
1.0
-
(
x
-
y
)
*
(
x
+
y
),
-
2.0
*
x
*
y
);
return
clogf
(
CMPLXF
(-
y
,
x
)
+
csqrtf
(
w
));
}