sysdeps/libm-ieee754/w_cabsf.c

   1 /*
   2  * cabsf() wrapper for hypotf().
   3  *
   4  * Written by J.T. Conklin, <jtc@wimsey.com>
   5  * Placed into the Public Domain, 1994.
   6  */
   7
   8 #include "math.h"
   9 #include "math_private.h"
  10
  11 struct __cabs_complexf
  12 {
  13   float x, y;
  14 };
  15
  16 float
  17 __cabsf (struct __cabs_complexf z)
  18 {
  19         return __hypotf(z.x, z.y);
  20 }
  21 weak_alias (__cabsf, cabsf)