Mercurial > octave
annotate liboctave/dbleSVD.h @ 10312:cbc402e64d83
untabify liboctave header files
| author | John W. Eaton <jwe@octave.org> |
|---|---|
| date | Thu, 11 Feb 2010 12:14:48 -0500 |
| parents | 4c0cdbe0acca |
| children | 3ce0c530a9c9 |
| rev | line source |
|---|---|
| 457 | 1 /* |
| 2 | |
| 7017 | 3 Copyright (C) 1994, 1995, 1996, 1997, 2000, 2002, 2003, 2004, 2005, |
| 9245 | 4 2006, 2007, 2009 John W. Eaton |
| 457 | 5 |
| 6 This file is part of Octave. | |
| 7 | |
| 8 Octave is free software; you can redistribute it and/or modify it | |
| 9 under the terms of the GNU General Public License as published by the | |
| 7016 | 10 Free Software Foundation; either version 3 of the License, or (at your |
| 11 option) any later version. | |
| 457 | 12 |
| 13 Octave is distributed in the hope that it will be useful, but WITHOUT | |
| 14 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
| 15 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
| 16 for more details. | |
| 17 | |
| 18 You should have received a copy of the GNU General Public License | |
| 7016 | 19 along with Octave; see the file COPYING. If not, see |
| 20 <http://www.gnu.org/licenses/>. | |
| 457 | 21 |
| 22 */ | |
| 23 | |
| 24 #if !defined (octave_SVD_h) | |
| 25 #define octave_SVD_h 1 | |
| 26 | |
|
8950
d865363208d6
include <iosfwd> instead of <iostream> in header files
John W. Eaton <jwe@octave.org>
parents:
7017
diff
changeset
|
27 #include <iosfwd> |
| 457 | 28 |
| 29 #include "dDiagMatrix.h" | |
| 30 #include "dMatrix.h" | |
| 31 | |
| 1880 | 32 class |
| 6108 | 33 OCTAVE_API |
| 1880 | 34 SVD |
| 457 | 35 { |
| 36 public: | |
| 37 | |
| 537 | 38 enum type |
| 39 { | |
| 40 std, | |
| 41 economy, | |
| 2802 | 42 sigma_only |
| 537 | 43 }; |
| 44 | |
| 1881 | 45 SVD (void) : sigma (), left_sm (), right_sm () { } |
| 1528 | 46 |
| 1529 | 47 SVD (const Matrix& a, type svd_type = SVD::std) { init (a, svd_type); } |
| 457 | 48 |
| 5275 | 49 SVD (const Matrix& a, octave_idx_type& info, type svd_type = SVD::std) |
| 1528 | 50 { |
| 51 info = init (a, svd_type); | |
| 52 } | |
| 457 | 53 |
| 1528 | 54 SVD (const SVD& a) |
| 4374 | 55 : type_computed (a.type_computed), |
| 56 sigma (a.sigma), left_sm (a.left_sm), right_sm (a.right_sm) { } | |
| 457 | 57 |
| 1528 | 58 SVD& operator = (const SVD& a) |
| 59 { | |
| 1880 | 60 if (this != &a) |
|
10312
cbc402e64d83
untabify liboctave header files
John W. Eaton <jwe@octave.org>
parents:
10158
diff
changeset
|
61 { |
|
cbc402e64d83
untabify liboctave header files
John W. Eaton <jwe@octave.org>
parents:
10158
diff
changeset
|
62 type_computed = a.type_computed; |
|
cbc402e64d83
untabify liboctave header files
John W. Eaton <jwe@octave.org>
parents:
10158
diff
changeset
|
63 sigma = a.sigma; |
|
cbc402e64d83
untabify liboctave header files
John W. Eaton <jwe@octave.org>
parents:
10158
diff
changeset
|
64 left_sm = a.left_sm; |
|
cbc402e64d83
untabify liboctave header files
John W. Eaton <jwe@octave.org>
parents:
10158
diff
changeset
|
65 right_sm = a.right_sm; |
|
cbc402e64d83
untabify liboctave header files
John W. Eaton <jwe@octave.org>
parents:
10158
diff
changeset
|
66 } |
| 1528 | 67 |
| 68 return *this; | |
| 69 } | |
| 70 | |
| 1930 | 71 ~SVD (void) { } |
| 72 | |
| 1528 | 73 DiagMatrix singular_values (void) const { return sigma; } |
| 74 | |
| 1544 | 75 Matrix left_singular_matrix (void) const; |
| 1528 | 76 |
| 1544 | 77 Matrix right_singular_matrix (void) const; |
| 457 | 78 |
| 3504 | 79 friend std::ostream& operator << (std::ostream& os, const SVD& a); |
| 457 | 80 |
| 81 private: | |
| 82 | |
| 1544 | 83 SVD::type type_computed; |
| 84 | |
| 457 | 85 DiagMatrix sigma; |
| 86 Matrix left_sm; | |
| 87 Matrix right_sm; | |
| 1880 | 88 |
| 5275 | 89 octave_idx_type init (const Matrix& a, type svd_type = std); |
| 457 | 90 }; |
| 91 | |
| 92 #endif |