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