Mercurial > mxe-octave

annotate src/armadillo-test.cpp @ 7220:d3087afece14 default tip @

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* src/gdal.mk, src/xcb.mk: disable doxygen docs
author John Donoghue <john.donoghue@ieee.org>
date Wed, 22 May 2024 10:31:54 -0400
parents 82d1044a4434
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2720
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
1 /*
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
2 * This file is part of MXE.
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
3 * See index.html for further information.
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
4 */
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
5
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
6 #include <armadillo>
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
7
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
8 using namespace arma;
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
9
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
10 int main()
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
11 {
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
12 mat A = randu<mat>(50,50);
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
13 mat B = trans(A)*A; // generate a symmetric matrix
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
14
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
15 vec eigval;
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
16 mat eigvec;
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
17
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
18 // use standard algorithm by default
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
19 eig_sym(eigval, eigvec, B);
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
20
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
21 // use divide & conquer algorithm
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
22 eig_sym(eigval, eigvec, B, "dc");
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
23 return 0;
82d1044a4434 added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff changeset
24 }