Patrick Welche <prlw1@cam.ac.uk>
[netbsd-mini2440.git] / lib / libm / complex / creal.c
blobc51d29d9e4a3b76a071f0125f121a8df28469782
1 /* $NetBSD$ */
3 /*
4 * Written by Matthias Drochner <drochner@NetBSD.org>.
5 * Public domain.
6 */
8 #include <complex.h>
10 double
11 creal(double complex z)
14 return __real__ z;