#ifndef BOOST_QVM_MAP_VEC_MAT_HPP_INCLUDED #define BOOST_QVM_MAP_VEC_MAT_HPP_INCLUDED /// Copyright (c) 2008-2021 Emil Dotchevski and Reverge Studios, Inc. /// Distributed under the Boost Software License, Version 1.0. (See accompanying /// file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt) #include #include #include #include #include namespace boost { namespace qvm { namespace qvm_detail { template class col_mat_ { col_mat_( col_mat_ const & ); col_mat_ & operator=( col_mat_ const & ); ~col_mat_(); public: template BOOST_QVM_INLINE_TRIVIAL col_mat_ & operator=( T const & x ) { assign(*this,x); return *this; } template BOOST_QVM_INLINE_TRIVIAL operator R() const { R r; assign(r,*this); return r; } }; } template struct mat_traits< qvm_detail::col_mat_ > { typedef qvm_detail::col_mat_ this_matrix; typedef typename vec_traits::scalar_type scalar_type; static int const rows=vec_traits::dim; static int const cols=1; template static BOOST_QVM_INLINE_CRITICAL scalar_type read_element( this_matrix const & x ) { BOOST_QVM_STATIC_ASSERT(Col==0); BOOST_QVM_STATIC_ASSERT(Row>=0); BOOST_QVM_STATIC_ASSERT(Row::template read_element(reinterpret_cast(x)); } template static BOOST_QVM_INLINE_CRITICAL scalar_type & write_element( this_matrix & x ) { BOOST_QVM_STATIC_ASSERT(Col==0); BOOST_QVM_STATIC_ASSERT(Row>=0); BOOST_QVM_STATIC_ASSERT(Row::template write_element(reinterpret_cast(x)); } static BOOST_QVM_INLINE_CRITICAL scalar_type read_element_idx( int row, int col, this_matrix const & x ) { BOOST_QVM_ASSERT(col==0); BOOST_QVM_ASSERT(row>=0); BOOST_QVM_ASSERT(row::read_element_idx(row,reinterpret_cast(x)); } static BOOST_QVM_INLINE_CRITICAL scalar_type & write_element_idx( int row, int col, this_matrix & x ) { BOOST_QVM_ASSERT(col==0); BOOST_QVM_ASSERT(row>=0); BOOST_QVM_ASSERT(row::write_element_idx(row,reinterpret_cast(x)); } }; template struct deduce_mat,R,C> { typedef mat::scalar_type,R,C> type; }; template struct deduce_mat2,qvm_detail::col_mat_,R,C> { typedef mat::scalar_type,R,C> type; }; template typename enable_if_c< is_vec::value, qvm_detail::col_mat_ const &>::type BOOST_QVM_INLINE_TRIVIAL col_mat( A const & a ) { return reinterpret_cast const &>(a); } template typename enable_if_c< is_vec::value, qvm_detail::col_mat_ &>::type BOOST_QVM_INLINE_TRIVIAL col_mat( A & a ) { return reinterpret_cast &>(a); } //////////////////////////////////////////////// namespace qvm_detail { template class row_mat_ { row_mat_( row_mat_ const & ); row_mat_ & operator=( row_mat_ const & ); ~row_mat_(); public: template BOOST_QVM_INLINE_TRIVIAL row_mat_ & operator=( T const & x ) { assign(*this,x); return *this; } template BOOST_QVM_INLINE_TRIVIAL operator R() const { R r; assign(r,*this); return r; } }; } template struct mat_traits< qvm_detail::row_mat_ > { typedef qvm_detail::row_mat_ this_matrix; typedef typename vec_traits::scalar_type scalar_type; static int const rows=1; static int const cols=vec_traits::dim; template static BOOST_QVM_INLINE_CRITICAL scalar_type read_element( this_matrix const & x ) { BOOST_QVM_STATIC_ASSERT(Row==0); BOOST_QVM_STATIC_ASSERT(Col>=0); BOOST_QVM_STATIC_ASSERT(Col::template read_element(reinterpret_cast(x)); } template static BOOST_QVM_INLINE_CRITICAL scalar_type & write_element( this_matrix & x ) { BOOST_QVM_STATIC_ASSERT(Row==0); BOOST_QVM_STATIC_ASSERT(Col>=0); BOOST_QVM_STATIC_ASSERT(Col::template write_element(reinterpret_cast(x)); } static BOOST_QVM_INLINE_CRITICAL scalar_type read_element_idx( int row, int col, this_matrix const & x ) { BOOST_QVM_ASSERT(row==0); BOOST_QVM_ASSERT(col>=0); BOOST_QVM_ASSERT(col::read_element_idx(col,reinterpret_cast(x)); } static BOOST_QVM_INLINE_CRITICAL scalar_type & write_element_idx( int row, int col, this_matrix & x ) { BOOST_QVM_ASSERT(row==0); BOOST_QVM_ASSERT(col>=0); BOOST_QVM_ASSERT(col::write_element_idx(col,reinterpret_cast(x)); } }; template struct deduce_mat,R,C> { typedef mat::scalar_type,R,C> type; }; template struct deduce_mat2,qvm_detail::row_mat_,R,C> { typedef mat::scalar_type,R,C> type; }; template typename enable_if_c< is_vec::value, qvm_detail::row_mat_ const &>::type BOOST_QVM_INLINE_TRIVIAL row_mat( A const & a ) { return reinterpret_cast const &>(a); } template typename enable_if_c< is_vec::value, qvm_detail::row_mat_ &>::type BOOST_QVM_INLINE_TRIVIAL row_mat( A & a ) { return reinterpret_cast &>(a); } //////////////////////////////////////////////// namespace qvm_detail { template class translation_mat_ { translation_mat_( translation_mat_ const & ); translation_mat_ & operator=( translation_mat_ const & ); ~translation_mat_(); public: template BOOST_QVM_INLINE_TRIVIAL translation_mat_ & operator=( T const & x ) { assign(*this,x); return *this; } template BOOST_QVM_INLINE_TRIVIAL operator R() const { R r; assign(r,*this); return r; } }; template ::cols-1)> struct read_translation_matat; template struct read_translation_matat,Row,Col,TransCol> { static BOOST_QVM_INLINE_CRITICAL typename mat_traits< translation_mat_ >::scalar_type f( translation_mat_ const & ) { return scalar_traits >::scalar_type>::value(0); } }; template struct read_translation_matat,D,D,false> { static BOOST_QVM_INLINE_CRITICAL typename mat_traits< translation_mat_ >::scalar_type f( translation_mat_ const & ) { return scalar_traits >::scalar_type>::value(1); } }; template struct read_translation_matat,D,D,true> { static BOOST_QVM_INLINE_CRITICAL typename mat_traits< translation_mat_ >::scalar_type f( translation_mat_ const & ) { return scalar_traits >::scalar_type>::value(1); } }; template struct read_translation_matat,Row,Col,true> { static BOOST_QVM_INLINE_CRITICAL typename mat_traits< translation_mat_ >::scalar_type f( translation_mat_ const & x ) { return vec_traits::template read_element(reinterpret_cast(x)); } }; } template struct mat_traits< qvm_detail::translation_mat_ > { typedef qvm_detail::translation_mat_ this_matrix; typedef typename vec_traits::scalar_type scalar_type; static int const rows=vec_traits::dim+1; static int const cols=vec_traits::dim+1; template static BOOST_QVM_INLINE_CRITICAL scalar_type read_element( this_matrix const & x ) { BOOST_QVM_STATIC_ASSERT(Row>=0); BOOST_QVM_STATIC_ASSERT(Row=0); BOOST_QVM_STATIC_ASSERT(Col,Row,Col>::f(x); } template static BOOST_QVM_INLINE_CRITICAL scalar_type & write_element( this_matrix & x ) { BOOST_QVM_STATIC_ASSERT(Row>=0); BOOST_QVM_STATIC_ASSERT(Row::template write_element(reinterpret_cast(x)); } static BOOST_QVM_INLINE_CRITICAL scalar_type read_element_idx( int row, int col, this_matrix const & x ) { BOOST_QVM_ASSERT(row>=0); BOOST_QVM_ASSERT(row=0); BOOST_QVM_ASSERT(col::value(1): (col==cols-1? vec_traits::read_element_idx(row,reinterpret_cast(x)): scalar_traits::value(0)); } static BOOST_QVM_INLINE_CRITICAL scalar_type & write_element_idx( int row, int col, this_matrix const & x ) { BOOST_QVM_ASSERT(row>=0); BOOST_QVM_ASSERT(row::write_element_idx(row,reinterpret_cast(x)); } }; template struct deduce_mat,R,C> { typedef mat::scalar_type,R,C> type; }; template struct deduce_mat2,qvm_detail::translation_mat_,R,C> { typedef mat::scalar_type,R,C> type; }; template typename enable_if_c< is_vec::value, qvm_detail::translation_mat_ const &>::type BOOST_QVM_INLINE_TRIVIAL translation_mat( A const & a ) { return reinterpret_cast const &>(a); } template typename enable_if_c< is_vec::value, qvm_detail::translation_mat_ &>::type BOOST_QVM_INLINE_TRIVIAL translation_mat( A & a ) { return reinterpret_cast &>(a); } //////////////////////////////////////////////// namespace qvm_detail { template class diag_mat_ { diag_mat_( diag_mat_ const & ); diag_mat_ & operator=( diag_mat_ const & ); ~diag_mat_(); public: template BOOST_QVM_INLINE_TRIVIAL diag_mat_ & operator=( T const & x ) { assign(*this,x); return *this; } template BOOST_QVM_INLINE_TRIVIAL operator R() const { R r; assign(r,*this); return r; } }; } template struct mat_traits< qvm_detail::diag_mat_ > { typedef qvm_detail::diag_mat_ this_matrix; typedef typename vec_traits::scalar_type scalar_type; static int const rows=vec_traits::dim; static int const cols=vec_traits::dim; template static BOOST_QVM_INLINE_CRITICAL scalar_type read_element( this_matrix const & x ) { BOOST_QVM_STATIC_ASSERT(Row>=0); BOOST_QVM_STATIC_ASSERT(Row=0); BOOST_QVM_STATIC_ASSERT(Col::template read_element(reinterpret_cast(x)):scalar_traits::value(0); } template static BOOST_QVM_INLINE_CRITICAL scalar_type & write_element( this_matrix & x ) { BOOST_QVM_STATIC_ASSERT(Row>=0); BOOST_QVM_STATIC_ASSERT(Row::template write_element(reinterpret_cast(x)); } static BOOST_QVM_INLINE_CRITICAL scalar_type read_element_idx( int row, int col, this_matrix const & x ) { BOOST_QVM_ASSERT(row>=0); BOOST_QVM_ASSERT(row=0); BOOST_QVM_ASSERT(col::read_element_idx(row,reinterpret_cast(x)):scalar_traits::value(0); } static BOOST_QVM_INLINE_CRITICAL scalar_type & write_element_idx( int row, int col, this_matrix & x ) { BOOST_QVM_ASSERT(row>=0); BOOST_QVM_ASSERT(row::write_element_idx(row,reinterpret_cast(x)); } }; template struct deduce_mat,R,C> { typedef mat::scalar_type,R,C> type; }; template struct deduce_mat2,qvm_detail::diag_mat_,R,C> { typedef mat::scalar_type,R,C> type; }; template typename enable_if_c< is_vec::value, qvm_detail::diag_mat_ const &>::type BOOST_QVM_INLINE_TRIVIAL diag_mat( A const & a ) { return reinterpret_cast const &>(a); } template typename enable_if_c< is_vec::value, qvm_detail::diag_mat_ &>::type BOOST_QVM_INLINE_TRIVIAL diag_mat( A & a ) { return reinterpret_cast &>(a); } } } #endif