NetBSD-5.0.2/lib/libm/complex/cimagf.c

/* $NetBSD: cimagf.c,v 1.1 2007/08/20 16:01:35 drochner Exp $ */

/*
 * Written by Matthias Drochner <drochner@NetBSD.org>.
 * Public domain.
 */

#include <complex.h>

float
cimagf(float complex z)
{

	return __imag__ z;
}