Mercurial > octave
changeset 30076:43622407af81
maint: rename lu member variable "m_l_fact" to "m_l".
* lu.cc, lu.h: Rename lu member variable "m_l_fact" to "m_l".
author | Rik <rik@octave.org> |
---|---|
date | Mon, 30 Aug 2021 10:52:39 -0700 |
parents | 0e0cc2760540 |
children | b16e0d357437 |
files | liboctave/numeric/lu.cc liboctave/numeric/lu.h |
diffstat | 2 files changed, 24 insertions(+), 24 deletions(-) [+] |
line wrap: on
line diff
--- a/liboctave/numeric/lu.cc Mon Aug 30 13:33:47 2021 -0400 +++ b/liboctave/numeric/lu.cc Mon Aug 30 10:52:39 2021 -0700 @@ -57,7 +57,7 @@ template <typename T> lu<T>::lu (const T& l, const T& u, const PermMatrix& p) - : m_a_fact (u), m_l_fact (l), m_ipvt (p.transpose ().col_perm_vec ()) + : m_a_fact (u), m_l (l), m_ipvt (p.transpose ().col_perm_vec ()) { if (l.columns () != u.rows ()) (*current_liboctave_error_handler) ("lu: dimension mismatch"); @@ -67,7 +67,7 @@ bool lu<T>::packed (void) const { - return m_l_fact.dims () == dim_vector (); + return m_l.dims () == dim_vector (); } template <typename T> @@ -76,7 +76,7 @@ { if (packed ()) { - m_l_fact = L (); + m_l = L (); m_a_fact = U (); // FIXME: sub-optimal // FIXME: getp returns Array<octave_idx_type> but m_ipvt is @@ -115,7 +115,7 @@ return l; } else - return m_l_fact; + return m_l; } template <typename T> @@ -300,7 +300,7 @@ if (packed ()) unpack (); - Matrix& l = m_l_fact; + Matrix& l = m_l; Matrix& r = m_a_fact; F77_INT m = to_f77_int (l.rows ()); @@ -326,7 +326,7 @@ if (packed ()) unpack (); - Matrix& l = m_l_fact; + Matrix& l = m_l; Matrix& r = m_a_fact; F77_INT m = to_f77_int (l.rows ()); @@ -359,7 +359,7 @@ if (packed ()) unpack (); - Matrix& l = m_l_fact; + Matrix& l = m_l; Matrix& r = m_a_fact; F77_INT m = to_f77_int (l.rows ()); @@ -390,7 +390,7 @@ if (packed ()) unpack (); - Matrix& l = m_l_fact; + Matrix& l = m_l; Matrix& r = m_a_fact; F77_INT m = to_f77_int (l.rows ()); @@ -454,7 +454,7 @@ if (packed ()) unpack (); - FloatMatrix& l = m_l_fact; + FloatMatrix& l = m_l; FloatMatrix& r = m_a_fact; F77_INT m = to_f77_int (l.rows ()); @@ -481,7 +481,7 @@ if (packed ()) unpack (); - FloatMatrix& l = m_l_fact; + FloatMatrix& l = m_l; FloatMatrix& r = m_a_fact; F77_INT m = to_f77_int (l.rows ()); @@ -515,7 +515,7 @@ if (packed ()) unpack (); - FloatMatrix& l = m_l_fact; + FloatMatrix& l = m_l; FloatMatrix& r = m_a_fact; F77_INT m = to_f77_int (l.rows ()); @@ -546,7 +546,7 @@ if (packed ()) unpack (); - FloatMatrix& l = m_l_fact; + FloatMatrix& l = m_l; FloatMatrix& r = m_a_fact; F77_INT m = to_f77_int (l.rows ()); @@ -611,7 +611,7 @@ if (packed ()) unpack (); - ComplexMatrix& l = m_l_fact; + ComplexMatrix& l = m_l; ComplexMatrix& r = m_a_fact; F77_INT m = to_f77_int (l.rows ()); @@ -639,7 +639,7 @@ if (packed ()) unpack (); - ComplexMatrix& l = m_l_fact; + ComplexMatrix& l = m_l; ComplexMatrix& r = m_a_fact; F77_INT m = to_f77_int (l.rows ()); @@ -676,7 +676,7 @@ if (packed ()) unpack (); - ComplexMatrix& l = m_l_fact; + ComplexMatrix& l = m_l; ComplexMatrix& r = m_a_fact; F77_INT m = to_f77_int (l.rows ()); @@ -710,7 +710,7 @@ if (packed ()) unpack (); - ComplexMatrix& l = m_l_fact; + ComplexMatrix& l = m_l; ComplexMatrix& r = m_a_fact; F77_INT m = to_f77_int (l.rows ()); @@ -779,7 +779,7 @@ if (packed ()) unpack (); - FloatComplexMatrix& l = m_l_fact; + FloatComplexMatrix& l = m_l; FloatComplexMatrix& r = m_a_fact; F77_INT m = to_f77_int (l.rows ()); @@ -808,7 +808,7 @@ if (packed ()) unpack (); - FloatComplexMatrix& l = m_l_fact; + FloatComplexMatrix& l = m_l; FloatComplexMatrix& r = m_a_fact; F77_INT m = to_f77_int (l.rows ()); @@ -843,7 +843,7 @@ if (packed ()) unpack (); - FloatComplexMatrix& l = m_l_fact; + FloatComplexMatrix& l = m_l; FloatComplexMatrix& r = m_a_fact; F77_INT m = to_f77_int (l.rows ()); @@ -877,7 +877,7 @@ if (packed ()) unpack (); - FloatComplexMatrix& l = m_l_fact; + FloatComplexMatrix& l = m_l; FloatComplexMatrix& r = m_a_fact; F77_INT m = to_f77_int (l.rows ());
--- a/liboctave/numeric/lu.h Mon Aug 30 13:33:47 2021 -0400 +++ b/liboctave/numeric/lu.h Mon Aug 30 10:52:39 2021 -0700 @@ -47,12 +47,12 @@ typedef typename T::element_type ELT_T; lu (void) - : m_a_fact (), m_l_fact (), m_ipvt () { } + : m_a_fact (), m_l (), m_ipvt () { } OCTAVE_API lu (const T& a); lu (const lu& a) - : m_a_fact (a.m_a_fact), m_l_fact (a.m_l_fact), m_ipvt (a.m_ipvt) { } + : m_a_fact (a.m_a_fact), m_l (a.m_l), m_ipvt (a.m_ipvt) { } OCTAVE_API lu (const T& l, const T& u, const PermMatrix& p); @@ -61,7 +61,7 @@ if (this != &a) { m_a_fact = a.m_a_fact; - m_l_fact = a.m_l_fact; + m_l = a.m_l; m_ipvt = a.m_ipvt; } @@ -101,7 +101,7 @@ OCTAVE_API Array<octave_idx_type> getp (void) const; T m_a_fact; - T m_l_fact; + T m_l; // This is internal storage that is passed to Fortran, // so we need a Fortran INTEGER.