Home | History | Annotate | Line # | Download | only in complex 
      1 /* $NetBSD: cimag.c,v 1.2 2010/09/15 16:11:29 christos Exp $ */
      2 
      3 /*
      4  * Written by Matthias Drochner <drochner (at) NetBSD.org>.
      5  * Public domain.
      6  */
      7 
      8 #include <complex.h>
      9 #include "../src/math_private.h"
     10 
     11 double
     12 cimag(double complex z)
     13 {
     14 	double_complex w = { .z = z };
     15 
     16 	return (IMAG_PART(w));
     17 }
     18