LQ.h
Go to the documentation of this file.
1 //=================================================================================================
33 //=================================================================================================
34 
35 #ifndef _BLAZE_MATH_DENSE_LQ_H_
36 #define _BLAZE_MATH_DENSE_LQ_H_
37 
38 
39 //*************************************************************************************************
40 // Includes
41 //*************************************************************************************************
42 
43 #include <memory>
44 #include <blaze/math/Aliases.h>
52 #include <blaze/math/Exception.h>
61 #include <blaze/util/EnableIf.h>
62 
63 
64 namespace blaze {
65 
66 //=================================================================================================
67 //
68 // LQ DECOMPOSITION FUNCTIONS
69 //
70 //=================================================================================================
71 
72 //*************************************************************************************************
75 template< typename MT1, bool SO1, typename MT2, bool SO2, typename MT3, bool SO3 >
76 void lq( const DenseMatrix<MT1,SO1>& A, DenseMatrix<MT2,SO2>& Q, DenseMatrix<MT3,SO3>& R );
78 //*************************************************************************************************
79 
80 
81 //*************************************************************************************************
93 template< typename MT1 > // Type of matrix A
94 inline EnableIf_<IsBuiltin< ElementType_<MT1> > >
95  lq_backend( MT1& A, const ElementType_<MT1>* tau )
96 {
97  orglq( A, tau );
98 }
100 //*************************************************************************************************
101 
102 
103 //*************************************************************************************************
115 template< typename MT1 > // Type of matrix A
116 inline EnableIf_<IsComplex< ElementType_<MT1> > >
117  lq_backend( MT1& A, const ElementType_<MT1>* tau )
118 {
119  unglq( A, tau );
120 }
122 //*************************************************************************************************
123 
124 
125 //*************************************************************************************************
173 template< typename MT1 // Type of matrix A
174  , bool SO1 // Storage order of matrix A
175  , typename MT2 // Type of matrix L
176  , bool SO2 // Storage order of matrix L
177  , typename MT3 // Type of matrix Q
178  , bool SO3 > // Storage order of matrix Q
180 {
183 
189 
192 
193  using ET1 = ElementType_<MT1>;
194 
195  const size_t m( (~A).rows() );
196  const size_t n( (~A).columns() );
197  const size_t mindim( min( m, n ) );
198 
199  if( ( !IsResizable<MT2>::value && ( (~L).rows() != m || (~L).columns() != mindim ) ) ||
200  ( !IsResizable<MT3>::value && ( (~Q).rows() != mindim || (~Q).columns() != n ) ) ) {
201  BLAZE_THROW_INVALID_ARGUMENT( "Dimensions of fixed size matrix do not match" );
202  }
203 
204  if( IsSquare<MT2>::value && m != mindim ) {
205  BLAZE_THROW_INVALID_ARGUMENT( "Square matrix cannot be resized to m-by-min(m,n)" );
206  }
207 
208  const std::unique_ptr<ET1[]> tau( new ET1[mindim] );
209  decltype(auto) l( derestrict( ~L ) );
210 
211  if( m < n )
212  {
213  (~Q) = A;
214  gelqf( ~Q, tau.get() );
215 
216  resize( ~L, m, m, false );
217  reset( l );
218 
219  for( size_t i=0UL; i<m; ++i ) {
220  for( size_t j=0UL; j<min(i+1UL,n); ++j ) {
221  l(i,j) = (~Q)(i,j);
222  }
223  }
224 
225  lq_backend( ~Q, tau.get() );
226  }
227  else
228  {
229  l = A;
230  gelqf( l, tau.get() );
231  (~Q) = submatrix( l, 0UL, 0UL, n, n );
232  lq_backend( ~Q, tau.get() );
233 
234  for( size_t i=0UL; i<m; ++i ) {
235  for( size_t j=i+1UL; j<n; ++j ) {
236  reset( l(i,j) );
237  }
238  }
239  }
240 }
241 //*************************************************************************************************
242 
243 } // namespace blaze
244 
245 #endif
Header file for the implementation of the Submatrix view.
#define BLAZE_THROW_INVALID_ARGUMENT(MESSAGE)
Macro for the emission of a std::invalid_argument exception.This macro encapsulates the default way o...
Definition: Exception.h:235
Header file for auxiliary alias declarations.
Headerfile for the generic min algorithm.
void orglq(int m, int n, int k, float *A, int lda, const float *tau, float *work, int lwork, int *info)
LAPACK kernel for the reconstruction of the orthogonal matrix Q from a LQ decomposition.
Definition: orglq.h:120
void reset(const DiagonalProxy< MT > &proxy)
Resetting the represented element to the default initial values.
Definition: DiagonalProxy.h:588
const ElementType_< MT > min(const DenseMatrix< MT, SO > &dm)
Returns the smallest element of the dense matrix.
Definition: DenseMatrix.h:1903
#define BLAZE_CONSTRAINT_MUST_NOT_BE_UNITRIANGULAR_MATRIX_TYPE(T)
Constraint on the data type.In case the given data type T is a lower or upper unitriangular matrix ty...
Definition: UniTriangular.h:81
Constraint on the data type.
Header file for the LAPACK functions to reconstruct Q from a LQ decomposition (unglq) ...
#define BLAZE_CONSTRAINT_MUST_NOT_BE_ADAPTOR_TYPE(T)
Constraint on the data type.In case the given data type T is an adaptor type (as for instance LowerMa...
Definition: Adaptor.h:81
Base class for dense matrices.The DenseMatrix class is a base class for all dense matrix classes...
Definition: DenseMatrix.h:80
Constraint on the data type.
Header file for the IsSquare type trait.
Constraint on the data type.
Namespace of the Blaze C++ math library.
Definition: Blaze.h:58
Header file for the LAPACK functions to reconstruct Q from a LQ decomposition (orglq) ...
Header file for the DenseMatrix base class.
typename T::ElementType ElementType_
Alias declaration for nested ElementType type definitions.The ElementType_ alias declaration provides...
Definition: Aliases.h:163
Compile time check for square matrices.This type trait tests whether or not the given template parame...
Definition: IsSquare.h:88
BLAZE_ALWAYS_INLINE size_t columns(const Matrix< MT, SO > &matrix) noexcept
Returns the current number of columns of the matrix.
Definition: Matrix.h:506
Header file for the exception macros of the math module.
#define BLAZE_CONSTRAINT_MUST_NOT_BE_UPPER_MATRIX_TYPE(T)
Constraint on the data type.In case the given data type T is a upper triangular matrix type...
Definition: Upper.h:81
BLAZE_ALWAYS_INLINE void resize(Matrix< MT, SO > &matrix, size_t rows, size_t columns, bool preserve=true)
Changing the size of the matrix.
Definition: Matrix.h:714
decltype(auto) submatrix(Matrix< MT, SO > &, RSAs...)
Creating a view on a specific submatrix of the given matrix.
Definition: Submatrix.h:360
Header file for the EnableIf class template.
Constraint on the data type.
Compile time check for resizable data types.This type trait tests whether the given data type is a re...
Definition: IsResizable.h:75
#define BLAZE_CONSTRAINT_MUST_NOT_BE_SYMMETRIC_MATRIX_TYPE(T)
Constraint on the data type.In case the given data type T is a symmetric matrix type, a compilation error is created.
Definition: Symmetric.h:79
Constraint on the data type.
#define BLAZE_CONSTRAINT_MUST_BE_BLAS_COMPATIBLE_TYPE(T)
Constraint on the data type.In case the given data type T is not a BLAS compatible data type (i...
Definition: BLASCompatible.h:61
Constraint on the data type.
void lq(const DenseMatrix< MT1, SO1 > &A, DenseMatrix< MT2, SO2 > &Q, DenseMatrix< MT3, SO3 > &R)
LQ decomposition of the given dense matrix.
Definition: LQ.h:179
Constraint on the data type.
#define BLAZE_CONSTRAINT_MUST_NOT_BE_STRICTLY_TRIANGULAR_MATRIX_TYPE(T)
Constraint on the data type.In case the given data type T is a strictly lower or upper triangular mat...
Definition: StrictlyTriangular.h:81
BLAZE_ALWAYS_INLINE size_t rows(const Matrix< MT, SO > &matrix) noexcept
Returns the current number of rows of the matrix.
Definition: Matrix.h:490
void gelqf(int m, int n, float *A, int lda, float *tau, float *work, int lwork, int *info)
LAPACK kernel for the LQ decomposition of the given dense single precision column-major matrix...
Definition: gelqf.h:146
void unglq(int m, int n, int k, complex< float > *A, int lda, const complex< float > *tau, complex< float > *work, int lwork, int *info)
LAPACK kernel for the reconstruction of the orthogonal matrix Q from a LQ decomposition.
Definition: unglq.h:120
#define BLAZE_CONSTRAINT_MUST_NOT_BE_HERMITIAN_MATRIX_TYPE(T)
Constraint on the data type.In case the given data type T is an Hermitian matrix type, a compilation error is created.
Definition: Hermitian.h:79
Header file for the IsResizable type trait.
Header file for the LAPACK LQ decomposition functions (gelqf)