conj.c revision 1.2
1/* $NetBSD: conj.c,v 1.2 2010/09/15 16:11:29 christos Exp $ */
2
3/*
4 * Written by Matthias Drochner <drochner@NetBSD.org>.
5 * Public domain.
6 */
7
8#include <complex.h>
9#include "../src/math_private.h"
10
11double complex
12conj(double complex z)
13{
14	double_complex w = { .z = z };
15
16	IMAG_PART(w) = -IMAG_PART(w);
17
18	return (w.z);
19}
20