blob: 4efd96052c326f7625d1362c4e9f8ae99f8b4ed2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
#include "__complex.h"
float complex cprojf(float complex z)
{
float_complex w = { .z = z };
if (isinf(crealf(z)) || isinf(cimagf(z))) {
REAL_PART(w) = INFINITY;
IMAG_PART(w) = copysignf(0.0, cimagf(z));
}
return (w.z);
}
|