* builtins.def: Break out _Complex math functions into their
[official-gcc.git] / libf2c / libF77 / c_abs.c
blob3fc4d7c0a6a76e91a12270e2c07868c48e0234ca
1 #include "f2c.h"
3 extern double f__cabs (double, double);
5 double
6 c_abs (complex * z)
8 return (f__cabs (z->r, z->i));