1#include "libm.h"
2
3double carg(double complex z)
4{
5	return atan2(cimag(z), creal(z));
6}
7