Chris@49: // Copyright (C) 2010-2012 NICTA (www.nicta.com.au)
Chris@49: // Copyright (C) 2010-2012 Conrad Sanderson
Chris@49: // 
Chris@49: // This Source Code Form is subject to the terms of the Mozilla Public
Chris@49: // License, v. 2.0. If a copy of the MPL was not distributed with this
Chris@49: // file, You can obtain one at http://mozilla.org/MPL/2.0/.
Chris@49: 
Chris@49: 
Chris@49: //! \addtogroup strip
Chris@49: //! @{
Chris@49: 
Chris@49: 
Chris@49: 
Chris@49: template<typename T1>
Chris@49: struct strip_diagmat
Chris@49:   {
Chris@49:   typedef T1 stored_type;
Chris@49:   
Chris@49:   arma_hot inline
Chris@49:   strip_diagmat(const T1& X)
Chris@49:     : M(X)
Chris@49:     {
Chris@49:     arma_extra_debug_sigprint();
Chris@49:     }
Chris@49:   
Chris@49:   static const bool do_diagmat = false;
Chris@49:   
Chris@49:   const T1& M;
Chris@49:   };
Chris@49: 
Chris@49: 
Chris@49: 
Chris@49: template<typename T1>
Chris@49: struct strip_diagmat< Op<T1, op_diagmat> >
Chris@49:   {
Chris@49:   typedef T1 stored_type;
Chris@49:   
Chris@49:   arma_hot inline
Chris@49:   strip_diagmat(const Op<T1, op_diagmat>& X)
Chris@49:     : M(X.m)
Chris@49:     {
Chris@49:     arma_extra_debug_sigprint();
Chris@49:     }
Chris@49:   
Chris@49:   static const bool do_diagmat = true;
Chris@49:   
Chris@49:   const T1& M;
Chris@49:   };
Chris@49: 
Chris@49: 
Chris@49: 
Chris@49: template<typename T1>
Chris@49: struct strip_inv
Chris@49:   {
Chris@49:   typedef T1 stored_type;
Chris@49:   
Chris@49:   arma_hot inline
Chris@49:   strip_inv(const T1& X)
Chris@49:     : M(X)
Chris@49:     {
Chris@49:     arma_extra_debug_sigprint();
Chris@49:     }
Chris@49:   
Chris@49:   const T1& M;
Chris@49:   
Chris@49:   static const bool slow   = false;
Chris@49:   static const bool do_inv = false;
Chris@49:   };
Chris@49: 
Chris@49: 
Chris@49: 
Chris@49: template<typename T1>
Chris@49: struct strip_inv< Op<T1, op_inv> >
Chris@49:   {
Chris@49:   typedef T1 stored_type;
Chris@49:   
Chris@49:   arma_hot inline
Chris@49:   strip_inv(const Op<T1, op_inv>& X)
Chris@49:     : M(X.m)
Chris@49:     , slow(X.aux_uword_a == 1)
Chris@49:     {
Chris@49:     arma_extra_debug_sigprint();
Chris@49:     }
Chris@49:   
Chris@49:   const T1&  M;
Chris@49:   const bool slow;
Chris@49:   
Chris@49:   static const bool do_inv = true;
Chris@49:   };
Chris@49: 
Chris@49: 
Chris@49: 
Chris@49: //! @}