lib/libm/complex/conj.c

   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
  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 }