Doxygen Source Code Documentation
z_abs.c
Go to the documentation of this file.00001 #include "f2c.h" 00002 00003 #ifdef KR_headers 00004 double f__cabs(); 00005 double z_abs(z) doublecomplex *z; 00006 #else 00007 double f__cabs(double, double); 00008 double z_abs(doublecomplex *z) 00009 #endif 00010 { 00011 return( f__cabs( z->r, z->i ) ); 00012 }