URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-old/] [newlib-1.17.0/] [newlib/] [libm/] [mathfp/] [w_cabs.c] - Rev 816
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); }