xref: /netbsd-src/lib/libm/complex/cabsf.c (revision 9d8b5fa74e215d4b0635398bb0efc741159631a6) 
1 /* $NetBSD: cabsf.c,v 1.1 2007/08/20 16:01:30 drochner Exp $ */
2 
3 /*
4  * Written by Matthias Drochner <drochner@NetBSD.org>.
5  * Public domain.
6  */
7 
8 #include "../src/namespace.h"
9 #include <complex.h>
10 #include <math.h>
11 
12 float
cabsf(float complex z)13 cabsf(float complex z)
14 {
15 
16 	return hypotf(__real__ z, __imag__ z);
17 }
18