URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [gnu-src/] [newlib-1.18.0/] [newlib/] [libm/] [math/] [w_cabs.c] - Rev 207
Compare with Previous | Blame | View Log
/* * cabs() wrapper for hypot(). * * Written by J.T. Conklin, <jtc@wimsey.com> * Placed into the Public Domain, 1994. */ #include "fdlibm.h" struct complex { double x; double y; }; double cabs(z) struct complex z; { return hypot(z.x, z.y); }