xref: /minix3/lib/libm/complex/cargf.c (revision 2fe8fb192fe7e8720e3e7a77f928da545e872a6a)
1 /* $NetBSD: cargf.c,v 1.1 2007/08/20 16:01:31 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
cargf(float complex z)13 cargf(float complex z)
14 {
15 
16 	return atan2f(__imag__ z, __real__ z);
17 }
18