Mercurial > hg > octave-nkf

comparison liboctave/dbleCHOL.h @ 1528:dc527156c38c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1995-10-05 01:44:18 by jwe]
author jwe
date Thu, 05 Oct 1995 01:45:30 +0000
parents 611d403c7f3d
children 950825cea083
comparison
equal deleted inserted replaced
1527:13d27938e778 1528:dc527156c38c
36 { 36 {
37 friend class Matrix; 37 friend class Matrix;
38 38
39 public: 39 public:
40 40
41 CHOL (void) {} 41 CHOL (void) { }
42 42
43 CHOL (const Matrix& a); 43 CHOL (const Matrix& a) { init (a); }
44 CHOL (const Matrix& a, int& info);
45 44
46 CHOL (const CHOL& a); 45 CHOL (const Matrix& a, int& info) { info = init (a); }
47 46
48 CHOL& operator = (const CHOL& a); 47 CHOL (const CHOL& a) { chol_mat = a.chol_mat; }
49 Matrix chol_matrix (void) const; 48
49 CHOL& operator = (const CHOL& a)
50 {
51 chol_mat = a.chol_mat;
52
53 return *this;
54 }
55
56 Matrix chol_matrix (void) const { return chol_mat; }
57
50 friend ostream& operator << (ostream& os, const CHOL& a); 58 friend ostream& operator << (ostream& os, const CHOL& a);
51 59
52 private: 60 private:
53 61
54 int init (const Matrix& a); 62 int init (const Matrix& a);
55 63
56 Matrix chol_mat; 64 Matrix chol_mat;
57 }; 65 };
58 66
59 inline CHOL::CHOL (const Matrix& a)
60 {
61 init (a);
62 }
63
64 inline CHOL::CHOL (const Matrix& a, int& info)
65 {
66 info = init (a);
67 }
68
69 inline CHOL::CHOL (const CHOL& a)
70 {
71 chol_mat = a.chol_mat;
72 }
73
74 inline CHOL&
75 CHOL::operator = (const CHOL& a)
76 {
77 chol_mat = a.chol_mat;
78
79 return *this;
80 }
81
82 inline Matrix CHOL::chol_matrix (void) const
83 {
84 return chol_mat;
85 }
86
87 #endif 67 #endif
88 68
89 /* 69 /*
90 ;;; Local Variables: *** 70 ;;; Local Variables: ***
91 ;;; mode: C++ *** 71 ;;; mode: C++ ***