Meg's Mirrors

zig

1	#include "complex_impl.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, cimag(z)));
7	return z;
8	}