Mercurial > mxe-octave
annotate src/armadillo-test.cpp @ 4039:1c72016826aa
of-fl-core: update patch for --enable-64
* src/of-fl-core-1-fixes.patch: update patch
author | John Donoghue |
---|---|
date | Wed, 30 Sep 2015 14:11:45 -0400 |
parents | 82d1044a4434 |
children |
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 } |