fusl/src/complex/carg.c

#include "libm.h"

double carg(double complex z)
{
	return atan2(cimag(z), creal(z));
}