src/complex/cproj.c

   1 #include "libm.h"
   2
   3 double complex cproj(double complex z)
   4 {
   5         if (isinf(creal(z)) || isinf(cimag(z)))
   6                 return CMPLX(INFINITY, copysign(0.0, creal(z)));
   7         return z;
   8 }