Mercurial > octave-nkf

comparison liboctave/numeric/dbleCHOL.h @ 20497:5ce959c55cc0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Propagate 'lower' in chol(a, 'lower') to underlying library function. * chol.cc (chol): Send 'L' parameter correctly when chol is called with 'lower'. * floatCHOL.cc (init): Propagate 'lower' to underlying library function. * floatCHOL.h: Modify the prototype of methods. * fMatrix.cc (inverse): Invoke chol with additional parameter. * dbleCHOL.cc (init): Propagate 'lower' to underlying library function. * dbleCHOL.h: Modify the prototype of methods. * dMatrix.cc (inverse): Invoke chol with additional parameter. * CmplxCHOL.cc (init): Propagate 'lower' to underlying library function. * CmplxCHOL.h: Modify the prototype of methods. * CMatrix.cc (inverse): Invoke chol with additional parameter.
author PrasannaKumar Muralidharan <prasannatsmkumar@gmail.com>
date Sun, 24 Aug 2014 19:35:06 +0530
parents 4197fc428c7d
children
comparison
equal deleted inserted replaced
20496:0fe7133da8ce 20497:5ce959c55cc0
35 { 35 {
36 public: 36 public:
37 37
38 CHOL (void) : chol_mat (), xrcond (0) { } 38 CHOL (void) : chol_mat (), xrcond (0) { }
39 39
40 CHOL (const Matrix& a, bool calc_cond = false) 40 CHOL (const Matrix& a, bool upper = true, bool calc_cond = false)
41 : chol_mat (), xrcond (0) 41 : chol_mat (), xrcond (0)
42 { 42 {
43 init (a, calc_cond); 43 init (a, upper, calc_cond);
44 } 44 }
45 45
46 CHOL (const Matrix& a, octave_idx_type& info, bool calc_cond = false) 46 CHOL (const Matrix& a, octave_idx_type& info, bool upper = true,
47 : chol_mat (), xrcond (0) 47 bool calc_cond = false) : chol_mat (), xrcond (0)
48 { 48 {
49 info = init (a, calc_cond); 49 info = init (a, upper, calc_cond);
50 } 50 }
51 51
52 CHOL (const CHOL& a) : chol_mat (a.chol_mat), xrcond (a.xrcond) { } 52 CHOL (const CHOL& a) : chol_mat (a.chol_mat), xrcond (a.xrcond) { }
53 53
54 CHOL& operator = (const CHOL& a) 54 CHOL& operator = (const CHOL& a)
86 86
87 Matrix chol_mat; 87 Matrix chol_mat;
88 88
89 double xrcond; 89 double xrcond;
90 90
91 octave_idx_type init (const Matrix& a, bool calc_cond); 91 bool is_upper;
92
93 octave_idx_type init (const Matrix& a, bool upper, bool calc_cond);
92 }; 94 };
93 95
94 Matrix OCTAVE_API chol2inv (const Matrix& r); 96 Matrix OCTAVE_API chol2inv (const Matrix& r);
95 97
96 #endif 98 #endif