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