Mercurial > octave-nkf

comparison src/sparse-xpow.cc @ 5506:b4cfbb0ec8c4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-10-23 19:09:32 by dbateman]
author dbateman
date Sun, 23 Oct 2005 19:09:33 +0000
parents 4c8a2e4e0717
children 2857357f9d3c
comparison
equal deleted inserted replaced
5505:17682e3fba2a 5506:b4cfbb0ec8c4
88 { 88 {
89 btmp = -btmp; 89 btmp = -btmp;
90 90
91 octave_idx_type info; 91 octave_idx_type info;
92 double rcond = 0.0; 92 double rcond = 0.0;
93 93 SparseType mattyp (a);
94 atmp = a.inverse (info, rcond, 1); 94
95 atmp = a.inverse (mattyp, info, rcond, 1);
95 96
96 if (info == -1) 97 if (info == -1)
97 warning ("inverse: matrix singular to machine\ 98 warning ("inverse: matrix singular to machine\
98 precision, rcond = %g", rcond); 99 precision, rcond = %g", rcond);
99 } 100 }
160 { 161 {
161 btmp = -btmp; 162 btmp = -btmp;
162 163
163 octave_idx_type info; 164 octave_idx_type info;
164 double rcond = 0.0; 165 double rcond = 0.0;
165 166 SparseType mattyp (a);
166 atmp = a.inverse (info, rcond, 1); 167
168 atmp = a.inverse (mattyp, info, rcond, 1);
167 169
168 if (info == -1) 170 if (info == -1)
169 warning ("inverse: matrix singular to machine\ 171 warning ("inverse: matrix singular to machine\
170 precision, rcond = %g", rcond); 172 precision, rcond = %g", rcond);
171 } 173 }