# define TGSOURCE "../complex/cabs.c" #include "_tgmath.h" #include "math.h" #include TYPE TGFN(cabs)(TYPE complex z) { return TGFN(hypot)(TGFN(creal)(z), TGFN(cimag)(z)); } /*d The cabs functions compute the complex absolute value (also called norm, modulus, or magnitude) of z. d*/ /*r The cabs functions return the complex absolute value. r*/ /* STDC(199901) LINK(m) */