Cross Reference: /src/lib/libm/complex/cimagf.c

cimagf.c revision 1.1

      1 /* $NetBSD: cimagf.c,v 1.1 2007/08/20 16:01:35 drochner Exp $ */
      2 
      3 /*
      4  * Written by Matthias Drochner <drochner (at) NetBSD.org>.
      5  * Public domain.
      6  */
      7 
      8 #include <complex.h>
      9 
     10 float
     11 cimagf(float complex z)
     12 {
     13 
     14 	return __imag__ z;
     15 }
     16