xref: /netbsd-src/lib/libm/complex/conj.c (revision e2a86dd3c762a96a961865112d4d0ded4715375a)
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 
11 double complex
conj(double complex z)12 conj(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