Home | History | Annotate | Line # | Download | only in complex 
      1 /* $NetBSD: cargf.c,v 1.1 2007/08/20 16:01:31 drochner Exp $ */
      2 
      3 /*
      4  * Written by Matthias Drochner <drochner (at) NetBSD.org>.
      5  * Public domain.
      6  */
      7 
      8 #include "../src/namespace.h"
      9 #include <complex.h>
     10 #include <math.h>
     11 
     12 float
     13 cargf(float complex z)
     14 {
     15 
     16 	return atan2f(__imag__ z, __real__ z);
     17 }
     18