]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - contrib/libf2c/libF77/z_abs.c
This commit was generated by cvs2svn to compensate for changes in r167612,
[FreeBSD/FreeBSD.git] / contrib / libf2c / libF77 / z_abs.c
1 #include "f2c.h"
2
3 double f__cabs (double, double);
4 double
5 z_abs (doublecomplex * z)
6 {
7   return (f__cabs (z->r, z->i));
8 }