Mercurial > hg > octave-lyh
diff liboctave/dbleHESS.h @ 1528:dc527156c38c
[project @ 1995-10-05 01:44:18 by jwe]
author | jwe |
---|---|
date | Thu, 05 Oct 1995 01:45:30 +0000 |
parents | 611d403c7f3d |
children | 8a6f67c94de8 |
line wrap: on
line diff
--- a/liboctave/dbleHESS.h +++ b/liboctave/dbleHESS.h @@ -38,16 +38,33 @@ public: - HESS (void) {} + HESS (void) { } HESS (const Matrix& a); HESS (const Matrix&a, int& info); - HESS (const HESS& a); + HESS (const Matrix& a) { init (a); } + + HESS (const Matrix& a, int& info) { info = init (a); } + + HESS (const HESS& a) + { + hess_mat = a.hess_mat; + unitary_hess_mat = a.unitary_hess_mat; + } - HESS& operator = (const HESS& a); - Matrix hess_matrix (void) const; - Matrix unitary_hess_matrix (void) const; + HESS& operator = (const HESS& a) + { + hess_mat = a.hess_mat; + unitary_hess_mat = a.unitary_hess_mat; + + return *this; + } + + Matrix hess_matrix (void) const { return hess_mat; } + + Matrix unitary_hess_matrix (void) const { return unitary_hess_mat; } + friend ostream& operator << (ostream& os, const HESS& a); private: @@ -58,41 +75,6 @@ Matrix unitary_hess_mat; }; -inline HESS::HESS (const Matrix& a) -{ - init (a); -} - -inline HESS::HESS (const Matrix& a, int& info) -{ - info = init (a); -} - -inline HESS::HESS (const HESS& a) -{ - hess_mat = a.hess_mat; - unitary_hess_mat = a.unitary_hess_mat; -} - -inline HESS& -HESS::operator = (const HESS& a) -{ - hess_mat = a.hess_mat; - unitary_hess_mat = a.unitary_hess_mat; - - return *this; -} - -inline Matrix HESS::hess_matrix (void) const -{ - return hess_mat; -} - -inline Matrix HESS::unitary_hess_matrix (void) const -{ - return unitary_hess_mat; -} - #endif /*