Meg's Mirrors
zig
about
heads
tags
log
tree
search
Search
zig
lib
libc
musl
src
complex
cprojf.c
pretty
plain
permalink
blame
history
•
8 lines
•
177 B
1
#include "complex_impl.h"
2
3
float complex cprojf(float complex z)
4
{
5
	if (isinf(crealf(z)) || isinf(cimagf(z)))
6
		return CMPLXF(INFINITY, copysignf(0.0, cimagf(z)));
7
	return z;
8
}