GRASS GIS 8 Programmer's Manual 8.2.1RC1(2022)-exported
hconj.c
Go to the documentation of this file.
1/* hconj.c CCMATH mathematics library source code.
2 *
3 * Copyright (C) 2000 Daniel A. Atkinson All rights reserved.
4 * This code may be redistributed under the terms of the GNU library
5 * public license (LGPL). ( See the lgpl.license file for details.)
6 * ------------------------------------------------------------------------
7 */
8#include "ccmath.h"
9void hconj(Cpx * a, int n)
10{
11 Cpx s, *p, *q;
12
13 int i, j, e;
14
15 for (i = 0, e = n - 1; i < n; ++i, --e, a += n + 1) {
16 for (j = 0, p = a + 1, q = a + n; j < e; ++j) {
17 s = *p;
18 s.im = -s.im;
19 p->re = q->re;
20 (p++)->im = -q->im;
21 *q = s;
22 q += n;
23 }
24 a->im = -a->im;
25 }
26}
void hconj(Cpx *a, int n)
Definition: hconj.c:9
Definition: ccmath.h:38
double re
Definition: ccmath.h:38
double im
Definition: ccmath.h:38