fn_qr.hpp

Go to the documentation of this file.
00001 // Copyright (C) 2010 NICTA and the authors listed below
00002 // http://nicta.com.au
00003 // 
00004 // Authors:
00005 // - Conrad Sanderson (conradsand at ieee dot org)
00006 // 
00007 // This file is part of the Armadillo C++ library.
00008 // It is provided without any warranty of fitness
00009 // for any purpose. You can redistribute this file
00010 // and/or modify it under the terms of the GNU
00011 // Lesser General Public License (LGPL) as published
00012 // by the Free Software Foundation, either version 3
00013 // of the License or (at your option) any later version.
00014 // (see http://www.opensource.org/licenses for more info)
00015 
00016 
00017 //! \addtogroup fn_qr
00018 //! @{
00019 
00020 
00021 //! QR decomposition
00022 template<typename T1>
00023 inline
00024 void
00025 qr(Mat<typename T1::elem_type>& Q, Mat<typename T1::elem_type>& R, const Base<typename T1::elem_type,T1>& X)
00026   {
00027   arma_extra_debug_sigprint();
00028   
00029   typedef typename T1::elem_type eT;
00030 
00031   arma_debug_check( (&Q == &R), "qr(): Q and R are the same object");
00032   
00033   const unwrap_check<T1> tmp1(X.get_ref(), Q);
00034   const Mat<eT>&     A = tmp1.M;
00035   
00036   const unwrap_check< Mat<eT> > tmp2(A, R);
00037   const Mat<eT>&            B = tmp2.M;
00038   
00039   const bool ok = auxlib::qr(Q, R, B);
00040   
00041   if(ok == false)
00042     {
00043     arma_print("qr(): matrix factorisation failed");
00044     }
00045   
00046   }
00047 
00048 
00049 //! @}