RTAI API: base/math/w_cabs.c Source File

00001 /* 00002 * cabs() wrapper for hypot(). 00003 * 00004 * Written by J.T. Conklin, <jtc@wimsey.com> 00005 * Placed into the Public Domain, 1994. 00006 */ 00007 00008 #include <math.h> 00009 00010 struct complex { 00011 double x; 00012 double y; 00013 }; 00014 00015 double 00016 cabs(struct complex z) 00017 { 00018 return hypot(z.x, z.y); 00019 }