/* * cabs() wrapper for hypot(). * * Written by J.T. Conklin, * Placed into the Public Domain, 1994. */ #include __FBSDID("$FreeBSD$"); #include #include double cabs(z) double complex z; { return hypot(creal(z), cimag(z)); }