Sign in
opensecura
/
3p
/
sel4
/
musllibc
/
4a8335b2248d934e2e40386af4f1b0495b3c173d
/
.
/
src
/
complex
/
cproj.c
blob: 15f358a14f045c0dd600a3c654b058c4c212326c [
file
]
#include
"libm.h"
double
complex cproj
(
double
complex z
)
{
if
(
isinf
(
creal
(
z
))
||
isinf
(
cimag
(
z
)))
return
CMPLX
(
INFINITY
,
copysign
(
0.0
,
creal
(
z
)));
return
z
;
}