GRASS GIS 8 Programmer's Manual
8.2.2dev(2023)-3d2c704037
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
"
9
void
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
}
ccmath.h
hconj
void hconj(Cpx *a, int n)
Definition:
hconj.c:9
complex::re
double re
Definition:
ccmath.h:38
complex::im
double im
Definition:
ccmath.h:38
complex
Definition:
la.h:54
lib
external
ccmath
hconj.c
Generated on Tue Feb 14 2023 05:56:00 for GRASS GIS 8 Programmer's Manual by
1.8.13