Mercurial > hg > octave-nkf
diff liboctave/CmplxSCHUR.h @ 1528:dc527156c38c
[project @ 1995-10-05 01:44:18 by jwe]
author | jwe |
---|---|
date | Thu, 05 Oct 1995 01:45:30 +0000 |
parents | 232dbc2460c0 |
children | 1af643fa00e3 |
line wrap: on
line diff
--- a/liboctave/CmplxSCHUR.h +++ b/liboctave/CmplxSCHUR.h @@ -38,17 +38,41 @@ public: - ComplexSCHUR (void) {} + ComplexSCHUR (void) { } + + ComplexSCHUR (const ComplexMatrix& a, const char *ord) + { + init (a,ord); + } - ComplexSCHUR (const ComplexMatrix& a, const char *ord); - ComplexSCHUR (const ComplexMatrix& a, const char *ord, int& info); + ComplexSCHUR (const ComplexMatrix& a, const char *ord, int& info) + { + info = init (a,ord); + } + + ComplexSCHUR (const ComplexSCHUR& a) + { + schur_mat = a.schur_mat; + unitary_mat = a.unitary_mat; + } - ComplexSCHUR (const ComplexSCHUR& a); + ComplexSCHUR& operator = (const ComplexSCHUR& a) + { + schur_mat = a.schur_mat; + unitary_mat = a.unitary_mat; + + return *this; + } - ComplexSCHUR& operator = (const ComplexSCHUR& a); + ComplexMatrix schur_matrix (void) const + { + return schur_mat; + } - ComplexMatrix schur_matrix (void) const; - ComplexMatrix unitary_matrix (void) const; + ComplexMatrix unitary_matrix (void) const + { + return unitary_mat; + } friend ostream& operator << (ostream& os, const ComplexSCHUR& a); @@ -60,42 +84,6 @@ ComplexMatrix unitary_mat; }; -inline ComplexSCHUR::ComplexSCHUR (const ComplexMatrix& a, const char *ord) -{ - init (a,ord); -} - -inline ComplexSCHUR::ComplexSCHUR (const ComplexMatrix& a, const char *ord, - int& info) -{ - info = init (a,ord); -} - -inline ComplexSCHUR::ComplexSCHUR (const ComplexSCHUR& a) -{ - schur_mat = a.schur_mat; - unitary_mat = a.unitary_mat; -} - -inline ComplexSCHUR& -ComplexSCHUR::operator = (const ComplexSCHUR& a) -{ - schur_mat = a.schur_mat; - unitary_mat = a.unitary_mat; - - return *this; -} - -inline ComplexMatrix ComplexSCHUR::schur_matrix (void) const -{ - return schur_mat; -} - -inline ComplexMatrix ComplexSCHUR::unitary_matrix (void) const -{ - return unitary_mat; -} - #endif /*