GRASS GIS 8 Programmer's Manual  8.4.0dev(2024)-9aacb948ba
heigvec.c
Go to the documentation of this file.
1 /* heigvec.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 
9 #include <stdlib.h>
10 #include "ccmath.h"
11 
12 void heigvec(Cpx *a, double *ev, int n)
13 {
14  double *dp;
15 
16  dp = (double *)calloc(n, sizeof(double));
17  chousv(a, ev, dp, n);
18  qrecvc(ev, a, dp, n);
19  hconj(a, n);
20  free(dp);
21 }
void qrecvc(double *eval, Cpx *evec, double *ud, int n)
Definition: qrecvc.c:11
void hconj(Cpx *u, int n)
Definition: hconj.c:11
void chousv(Cpx *a, double *d, double *ud, int n)
Definition: chousv.c:12
void heigvec(Cpx *a, double *ev, int n)
Definition: heigvec.c:12
void free(void *)
Definition: la.h:54