newlib-cygwin/winsup/mingw/mingwex/complex/cabs.c

8 lines
119 B
C

#include <math.h>
#include <complex.h>
double cabs (double complex Z)
{
return _hypot ( __real__ Z, __imag__ Z);
}