Mercurial > hg > octave-lyh
diff liboctave/dbleSCHUR.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/dbleSCHUR.h +++ b/liboctave/dbleSCHUR.h @@ -38,17 +38,32 @@ public: - SCHUR (void) {} + SCHUR (void) { } + + SCHUR (const Matrix& a, const char *ord) { init (a, ord); } - SCHUR (const Matrix& a, const char *ord); - SCHUR (const Matrix& a, const char *ord, int& info); + SCHUR (const Matrix& a, const char *ord, int& info) + { + info = init (a, ord); + } - SCHUR (const SCHUR& a); + SCHUR (const SCHUR& a) + { + schur_mat = a.schur_mat; + unitary_mat = a.unitary_mat; + } - SCHUR& operator = (const SCHUR& a); + SCHUR& operator = (const SCHUR& a) + { + schur_mat = a.schur_mat; + unitary_mat = a.unitary_mat; - Matrix schur_matrix (void) const; - Matrix unitary_matrix (void) const; + return *this; + } + + Matrix schur_matrix (void) const { return schur_mat; } + + Matrix unitary_matrix (void) const { return unitary_mat; } friend ostream& operator << (ostream& os, const SCHUR& a); @@ -60,41 +75,6 @@ Matrix unitary_mat; }; -inline SCHUR::SCHUR (const Matrix& a, const char *ord) -{ - init (a, ord); -} - -inline SCHUR::SCHUR (const Matrix& a, const char *ord, int& info) -{ - info = init (a, ord); -} - -inline SCHUR::SCHUR (const SCHUR& a) -{ - schur_mat = a.schur_mat; - unitary_mat = a.unitary_mat; -} - -inline SCHUR& -SCHUR::operator = (const SCHUR& a) -{ - schur_mat = a.schur_mat; - unitary_mat = a.unitary_mat; - - return *this; -} - -inline Matrix SCHUR::schur_matrix (void) const -{ - return schur_mat; -} - -inline Matrix SCHUR::unitary_matrix (void) const -{ - return unitary_mat; -} - #endif /*