Sign in
cobalt
/
cobalt
/
07081467c3d00b04a6a1162e0566a5a8b9cfe2d5
/
.
/
third_party
/
musl
/
src
/
complex
/
cproj.c
blob: 15f358a14f045c0dd600a3c654b058c4c212326c [
file
] [
log
] [
blame
]
#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
;
}