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