Mercurial > hg > octave-lyh

comparison liboctave/fDiagMatrix.cc @ 8366:8b1a2555c4e2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
implement diagonal matrix objects * * *
author Jaroslav Hajek <highegg@gmail.com>
date Wed, 03 Dec 2008 13:32:57 +0100
parents 4976f66d469b
children c3f7e2549abb
comparison
equal deleted inserted replaced
8365:65ca196fff28 8366:8b1a2555c4e2
134 134
135 for (octave_idx_type i = 0; i < a_len; i++) 135 for (octave_idx_type i = 0; i < a_len; i++)
136 elem (i+beg, i+beg) = a.elem (i); 136 elem (i+beg, i+beg) = a.elem (i);
137 137
138 return *this; 138 return *this;
139 }
140
141 FloatDiagMatrix
142 FloatDiagMatrix::abs (void) const
143 {
144 FloatDiagMatrix retval (rows (), cols ());
145 for (octave_idx_type i = 0; i < rows (); i++)
146 retval(i, i) = std::abs (elem (i, i));
147 return retval;
139 } 148 }
140 149
141 FloatDiagMatrix 150 FloatDiagMatrix
142 real (const FloatComplexDiagMatrix& a) 151 real (const FloatComplexDiagMatrix& a)
143 { 152 {