cproj.c « complex « src - grovel - Unnamed repository; edit this file 'description' to name the repository.

about summary refs log tree commit diff

path: root/src/complex/cproj.c

blob: 1cf9bb949af6ae88e67642d71cc7ff741476f943 (about) (plain) (blame)

#include "libm.h"

double complex cproj(double complex z)
{
	if (isinf(creal(z)) || isinf(cimag(z)))
		return cpack(INFINITY, copysign(0.0, creal(z)));
	return z;
}