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

cimag.c revision 1.1

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