Mercurial > mxe-octave

annotate src/armadillo-test.cpp @ 3725:2acaa9943159

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
qscintilla: update 2.8.4 * src/qscintilla.mk: update to version and checksum for 2.8.4
author John Donoghue
date Mon, 20 Oct 2014 11:01:00 -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 }