GRASS GIS 8 Programmer's Manual  8.2.2dev(2023)-3d2c704037
eigen.c
Go to the documentation of this file.
1 /* eigen.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 <stdlib.h>
9 #include "ccmath.h"
10 void eigen(double *a, double *ev, int n)
11 {
12  double *dp;
13 
14  dp = (double *)calloc(n, sizeof(double));
15  housev(a, ev, dp, n);
16  qrevec(ev, a, dp, n);
17  trnm(a, n);
18  free(dp);
19 }
void eigen(double *a, double *ev, int n)
Definition: eigen.c:10
void trnm(double *a, int n)
Definition: trnm.c:8
void free(void *)
int qrevec(double *eval, double *evec, double *dp, int n)
Definition: qrevec.c:9
void housev(double *a, double *d, double *ud, int n)
Definition: housev.c:10