987 lines
31 KiB
C++
987 lines
31 KiB
C++
//Copyright (c) 2008-2016 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)
|
|
|
|
#ifndef UUID_384AFF3AD23A11DFA80B754FE0D72085
|
|
#define UUID_384AFF3AD23A11DFA80B754FE0D72085
|
|
|
|
#include <boost/qvm/vec_operations2.hpp>
|
|
#include <boost/qvm/vec_operations3.hpp>
|
|
#include <boost/qvm/vec_operations4.hpp>
|
|
#include <boost/qvm/assert.hpp>
|
|
#include <boost/qvm/scalar_traits.hpp>
|
|
#include <string>
|
|
|
|
namespace
|
|
boost
|
|
{
|
|
namespace
|
|
qvm
|
|
{
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
BOOST_QVM_INLINE_CRITICAL
|
|
void const *
|
|
get_valid_ptr_vec_operations()
|
|
{
|
|
static int const obj=0;
|
|
return &obj;
|
|
}
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_to_string_detail
|
|
{
|
|
template <class T>
|
|
std::string to_string( T const & x );
|
|
}
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <int D>
|
|
struct
|
|
to_string_v_defined
|
|
{
|
|
static bool const value=false;
|
|
};
|
|
|
|
template <int I,int DimMinusOne>
|
|
struct
|
|
to_string_vector_elements
|
|
{
|
|
template <class A>
|
|
static
|
|
std::string
|
|
f( A const & a )
|
|
{
|
|
using namespace qvm_to_string_detail;
|
|
return to_string(vec_traits<A>::template read_element<I>(a))+','+to_string_vector_elements<I+1,DimMinusOne>::f(a);
|
|
}
|
|
};
|
|
|
|
template <int DimMinusOne>
|
|
struct
|
|
to_string_vector_elements<DimMinusOne,DimMinusOne>
|
|
{
|
|
template <class A>
|
|
static
|
|
std::string
|
|
f( A const & a )
|
|
{
|
|
using namespace qvm_to_string_detail;
|
|
return to_string(vec_traits<A>::template read_element<DimMinusOne>(a));
|
|
}
|
|
};
|
|
}
|
|
|
|
template <class A>
|
|
inline
|
|
typename boost::enable_if_c<
|
|
is_vec<A>::value &&
|
|
!qvm_detail::to_string_v_defined<vec_traits<A>::dim>::value,
|
|
std::string>::type
|
|
to_string( A const & a )
|
|
{
|
|
return '('+qvm_detail::to_string_vector_elements<0,vec_traits<A>::dim-1>::f(a)+')';
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <int D>
|
|
struct
|
|
assign_vv_defined
|
|
{
|
|
static bool const value=false;
|
|
};
|
|
|
|
template <int I,int N>
|
|
struct
|
|
copy_vector_elements
|
|
{
|
|
template <class A,class B>
|
|
static
|
|
void
|
|
f( A & a, B const & b )
|
|
{
|
|
vec_traits<A>::template write_element<I>(a)=vec_traits<B>::template read_element<I>(b);
|
|
copy_vector_elements<I+1,N>::f(a,b);
|
|
}
|
|
};
|
|
|
|
template <int N>
|
|
struct
|
|
copy_vector_elements<N,N>
|
|
{
|
|
template <class A,class B>
|
|
static
|
|
void
|
|
f( A &, B const & )
|
|
{
|
|
}
|
|
};
|
|
}
|
|
|
|
template <class A,class B>
|
|
inline
|
|
typename boost::enable_if_c<
|
|
is_vec<A>::value && is_vec<B>::value &&
|
|
vec_traits<A>::dim==vec_traits<B>::dim &&
|
|
!qvm_detail::assign_vv_defined<vec_traits<A>::dim>::value,
|
|
A &>::type
|
|
assign( A & a, B const & b )
|
|
{
|
|
qvm_detail::copy_vector_elements<0,vec_traits<A>::dim>::f(a,b);
|
|
return a;
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <int D>
|
|
struct
|
|
convert_to_v_defined
|
|
{
|
|
static bool const value=false;
|
|
};
|
|
}
|
|
|
|
template <class R,class A>
|
|
BOOST_QVM_INLINE_TRIVIAL
|
|
typename enable_if_c<
|
|
is_vec<R>::value && is_vec<A>::value &&
|
|
vec_traits<R>::dim==vec_traits<A>::dim &&
|
|
!qvm_detail::convert_to_v_defined<vec_traits<R>::dim>::value,
|
|
R>::type
|
|
convert_to( A const & a )
|
|
{
|
|
R r; assign(r,a);
|
|
return r;
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
template <class A,class B>
|
|
BOOST_QVM_INLINE_OPERATIONS
|
|
typename lazy_enable_if_c<
|
|
is_vec<A>::value && is_vec<B>::value &&
|
|
vec_traits<A>::dim==3 && vec_traits<B>::dim==3,
|
|
deduce_vec2<A,B,3> >::type
|
|
cross( A const & a, B const & b )
|
|
{
|
|
typedef typename deduce_vec2<A,B,3>::type R;
|
|
R r;
|
|
vec_traits<R>::template write_element<0>(r)=
|
|
vec_traits<A>::template read_element<1>(a)*vec_traits<B>::template read_element<2>(b)-
|
|
vec_traits<A>::template read_element<2>(a)*vec_traits<B>::template read_element<1>(b);
|
|
vec_traits<R>::template write_element<1>(r)=
|
|
vec_traits<A>::template read_element<2>(a)*vec_traits<B>::template read_element<0>(b)-
|
|
vec_traits<A>::template read_element<0>(a)*vec_traits<B>::template read_element<2>(b);
|
|
vec_traits<R>::template write_element<2>(r)=
|
|
vec_traits<A>::template read_element<0>(a)*vec_traits<B>::template read_element<1>(b)-
|
|
vec_traits<A>::template read_element<1>(a)*vec_traits<B>::template read_element<0>(b);
|
|
return r;
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
template <class A,class B,class Cmp>
|
|
BOOST_QVM_INLINE_OPERATIONS
|
|
typename enable_if_c<
|
|
is_vec<A>::value && is_vec<B>::value &&
|
|
vec_traits<A>::dim==vec_traits<B>::dim,
|
|
bool>::type
|
|
cmp( A const & a, B const & b, Cmp f )
|
|
{
|
|
typedef typename deduce_scalar<
|
|
typename vec_traits<A>::scalar_type,
|
|
typename vec_traits<B>::scalar_type>::type T;
|
|
int const dim=vec_traits<A>::dim;
|
|
T v1[dim]; assign(v1,a);
|
|
T v2[dim]; assign(v2,b);
|
|
for( int i=0; i!=dim; ++i )
|
|
if( !f(v1[i],v2[i]) )
|
|
return false;
|
|
return true;
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <class T,int Dim>
|
|
class
|
|
zero_vec_
|
|
{
|
|
zero_vec_( zero_vec_ const & );
|
|
zero_vec_ & operator=( zero_vec_ const & );
|
|
~zero_vec_();
|
|
|
|
public:
|
|
|
|
template <class R>
|
|
BOOST_QVM_INLINE_TRIVIAL
|
|
operator R() const
|
|
{
|
|
R r;
|
|
assign(r,*this);
|
|
return r;
|
|
}
|
|
};
|
|
}
|
|
|
|
template <class V>
|
|
struct vec_traits;
|
|
|
|
template <class T,int Dim>
|
|
struct
|
|
vec_traits< qvm_detail::zero_vec_<T,Dim> >
|
|
{
|
|
typedef qvm_detail::zero_vec_<T,Dim> this_vector;
|
|
typedef T scalar_type;
|
|
static int const dim=Dim;
|
|
|
|
template <int I>
|
|
static
|
|
BOOST_QVM_INLINE_CRITICAL
|
|
scalar_type
|
|
read_element( this_vector const & x )
|
|
{
|
|
BOOST_QVM_STATIC_ASSERT(I>=0);
|
|
BOOST_QVM_STATIC_ASSERT(I<Dim);
|
|
return scalar_traits<scalar_type>::value(0);
|
|
}
|
|
|
|
static
|
|
BOOST_QVM_INLINE_CRITICAL
|
|
scalar_type
|
|
read_element_idx( int i, this_vector const & x )
|
|
{
|
|
BOOST_QVM_ASSERT(i>=0);
|
|
BOOST_QVM_ASSERT(i<Dim);
|
|
return scalar_traits<scalar_type>::value(0);
|
|
}
|
|
};
|
|
|
|
template <class T,int Dim,int D>
|
|
struct
|
|
deduce_vec<qvm_detail::zero_vec_<T,Dim>,D>
|
|
{
|
|
typedef vec<T,D> type;
|
|
};
|
|
|
|
template <class T,int Dim>
|
|
BOOST_QVM_INLINE_TRIVIAL
|
|
qvm_detail::zero_vec_<T,Dim> const &
|
|
zero_vec()
|
|
{
|
|
return *(qvm_detail::zero_vec_<T,Dim> const *)qvm_detail::get_valid_ptr_vec_operations();
|
|
}
|
|
|
|
template <class A>
|
|
BOOST_QVM_INLINE_OPERATIONS
|
|
typename enable_if_c<
|
|
is_vec<A>::value,
|
|
void>::type
|
|
set_zero( A & a )
|
|
{
|
|
assign(a,zero_vec<typename vec_traits<A>::scalar_type,vec_traits<A>::dim>());
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <class OriginalType,class Scalar>
|
|
class
|
|
vector_scalar_cast_
|
|
{
|
|
vector_scalar_cast_( vector_scalar_cast_ const & );
|
|
vector_scalar_cast_ & operator=( vector_scalar_cast_ const & );
|
|
~vector_scalar_cast_();
|
|
|
|
public:
|
|
|
|
template <class T>
|
|
BOOST_QVM_INLINE_TRIVIAL
|
|
vector_scalar_cast_ &
|
|
operator=( T const & x )
|
|
{
|
|
assign(*this,x);
|
|
return *this;
|
|
}
|
|
|
|
template <class R>
|
|
BOOST_QVM_INLINE_TRIVIAL
|
|
operator R() const
|
|
{
|
|
R r;
|
|
assign(r,*this);
|
|
return r;
|
|
}
|
|
};
|
|
|
|
template <bool> struct scalar_cast_vector_filter { };
|
|
template <> struct scalar_cast_vector_filter<true> { typedef int type; };
|
|
}
|
|
|
|
template <class OriginalType,class Scalar>
|
|
struct
|
|
vec_traits< qvm_detail::vector_scalar_cast_<OriginalType,Scalar> >
|
|
{
|
|
typedef Scalar scalar_type;
|
|
typedef qvm_detail::vector_scalar_cast_<OriginalType,Scalar> this_vector;
|
|
static int const dim=vec_traits<OriginalType>::dim;
|
|
|
|
template <int I>
|
|
static
|
|
BOOST_QVM_INLINE_CRITICAL
|
|
scalar_type
|
|
read_element( this_vector const & x )
|
|
{
|
|
BOOST_QVM_STATIC_ASSERT(I>=0);
|
|
BOOST_QVM_STATIC_ASSERT(I<dim);
|
|
return scalar_type(vec_traits<OriginalType>::template read_element<I>(reinterpret_cast<OriginalType const &>(x)));
|
|
}
|
|
|
|
static
|
|
BOOST_QVM_INLINE_CRITICAL
|
|
scalar_type
|
|
read_element_idx( int i, this_vector const & x )
|
|
{
|
|
BOOST_QVM_ASSERT(i>=0);
|
|
BOOST_QVM_ASSERT(i<dim);
|
|
return scalar_type(vec_traits<OriginalType>::read_element_idx(i,reinterpret_cast<OriginalType const &>(x)));
|
|
}
|
|
};
|
|
|
|
template <class OriginalType,class Scalar,int D>
|
|
struct
|
|
deduce_vec<qvm_detail::vector_scalar_cast_<OriginalType,Scalar>,D>
|
|
{
|
|
typedef vec<Scalar,D> type;
|
|
};
|
|
|
|
template <class Scalar,class T>
|
|
BOOST_QVM_INLINE_TRIVIAL
|
|
qvm_detail::vector_scalar_cast_<T,Scalar> const &
|
|
scalar_cast( T const & x, typename qvm_detail::scalar_cast_vector_filter<is_vec<T>::value>::type=0 )
|
|
{
|
|
return reinterpret_cast<qvm_detail::vector_scalar_cast_<T,Scalar> const &>(x);
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <int D>
|
|
struct
|
|
div_eq_vs_defined
|
|
{
|
|
static bool const value=false;
|
|
};
|
|
}
|
|
|
|
template <class A,class B>
|
|
BOOST_QVM_INLINE_OPERATIONS
|
|
typename enable_if_c<
|
|
is_vec<A>::value && is_scalar<B>::value &&
|
|
!qvm_detail::div_eq_vs_defined<vec_traits<A>::dim>::value,
|
|
A &>::type
|
|
operator/=( A & a, B b )
|
|
{
|
|
for( int i=0; i!=vec_traits<A>::dim; ++i )
|
|
vec_traits<A>::write_element_idx(i,a)/=b;
|
|
return a;
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <int D>
|
|
struct
|
|
div_vs_defined
|
|
{
|
|
static bool const value=false;
|
|
};
|
|
}
|
|
|
|
template <class A,class B>
|
|
BOOST_QVM_INLINE_OPERATIONS
|
|
typename lazy_enable_if_c<
|
|
is_vec<A>::value && is_scalar<B>::value &&
|
|
!qvm_detail::div_vs_defined<vec_traits<A>::dim>::value,
|
|
deduce_vec<A> >::type
|
|
operator/( A const & a, B b )
|
|
{
|
|
typedef typename deduce_vec<A>::type R;
|
|
R r;
|
|
for( int i=0; i!=vec_traits<A>::dim; ++i )
|
|
vec_traits<R>::write_element_idx(i,r)=vec_traits<A>::read_element_idx(i,a)/b;
|
|
return r;
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <int D>
|
|
struct
|
|
dot_vv_defined
|
|
{
|
|
static bool const value=false;
|
|
};
|
|
}
|
|
|
|
template <class A,class B>
|
|
BOOST_QVM_INLINE_OPERATIONS
|
|
typename lazy_enable_if_c<
|
|
is_vec<A>::value && is_vec<B>::value &&
|
|
vec_traits<A>::dim==vec_traits<B>::dim &&
|
|
!qvm_detail::dot_vv_defined<vec_traits<A>::dim>::value,
|
|
deduce_scalar<typename vec_traits<A>::scalar_type,typename vec_traits<B>::scalar_type> >::type
|
|
dot( A const & a, B const & b )
|
|
{
|
|
typedef typename deduce_scalar<typename vec_traits<A>::scalar_type,typename vec_traits<B>::scalar_type>::type T;
|
|
T m(scalar_traits<T>::value(0));
|
|
for( int i=0; i!=vec_traits<A>::dim; ++i )
|
|
m+=vec_traits<A>::read_element_idx(i,a)*vec_traits<B>::read_element_idx(i,b);
|
|
return m;
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <int D>
|
|
struct
|
|
eq_vv_defined
|
|
{
|
|
static bool const value=false;
|
|
};
|
|
}
|
|
|
|
template <class A,class B>
|
|
BOOST_QVM_INLINE_OPERATIONS
|
|
typename enable_if_c<
|
|
is_vec<A>::value && is_vec<B>::value &&
|
|
vec_traits<A>::dim==vec_traits<B>::dim &&
|
|
!qvm_detail::eq_vv_defined<vec_traits<A>::dim>::value,
|
|
bool>::type
|
|
operator==( A const & a, B const & b )
|
|
{
|
|
for( int i=0; i!=vec_traits<A>::dim; ++i )
|
|
if( vec_traits<A>::read_element_idx(i,a)!=vec_traits<B>::read_element_idx(i,b) )
|
|
return false;
|
|
return true;
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <int D>
|
|
struct
|
|
mag_sqr_v_defined
|
|
{
|
|
static bool const value=false;
|
|
};
|
|
}
|
|
|
|
template <class A>
|
|
BOOST_QVM_INLINE_OPERATIONS
|
|
typename enable_if_c<
|
|
is_vec<A>::value &&
|
|
!qvm_detail::mag_sqr_v_defined<vec_traits<A>::dim>::value,
|
|
typename vec_traits<A>::scalar_type>::type
|
|
mag_sqr( A const & a )
|
|
{
|
|
typedef typename vec_traits<A>::scalar_type T;
|
|
T m(scalar_traits<T>::value(0));
|
|
for( int i=0; i!=vec_traits<A>::dim; ++i )
|
|
{
|
|
T x=vec_traits<A>::read_element_idx(i,a);
|
|
m+=x*x;
|
|
}
|
|
return m;
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <int D>
|
|
struct
|
|
mag_v_defined
|
|
{
|
|
static bool const value=false;
|
|
};
|
|
}
|
|
|
|
template <class A>
|
|
BOOST_QVM_INLINE_OPERATIONS
|
|
typename enable_if_c<
|
|
is_vec<A>::value &&
|
|
!qvm_detail::mag_v_defined<vec_traits<A>::dim>::value,
|
|
typename vec_traits<A>::scalar_type>::type
|
|
mag( A const & a )
|
|
{
|
|
typedef typename vec_traits<A>::scalar_type T;
|
|
T m(scalar_traits<T>::value(0));
|
|
for( int i=0; i!=vec_traits<A>::dim; ++i )
|
|
{
|
|
T x=vec_traits<A>::read_element_idx(i,a);
|
|
m+=x*x;
|
|
}
|
|
return sqrt<T>(m);
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <int D>
|
|
struct
|
|
minus_eq_vv_defined
|
|
{
|
|
static bool const value=false;
|
|
};
|
|
}
|
|
|
|
template <class A,class B>
|
|
BOOST_QVM_INLINE_OPERATIONS
|
|
typename enable_if_c<
|
|
is_vec<A>::value && is_vec<B>::value &&
|
|
vec_traits<A>::dim==vec_traits<B>::dim &&
|
|
!qvm_detail::minus_eq_vv_defined<vec_traits<A>::dim>::value,
|
|
A &>::type
|
|
operator-=( A & a, B const & b )
|
|
{
|
|
for( int i=0; i!=vec_traits<A>::dim; ++i )
|
|
vec_traits<A>::write_element_idx(i,a)-=vec_traits<B>::read_element_idx(i,b);
|
|
return a;
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <int D>
|
|
struct
|
|
minus_v_defined
|
|
{
|
|
static bool const value=false;
|
|
};
|
|
}
|
|
|
|
template <class A>
|
|
BOOST_QVM_INLINE_OPERATIONS
|
|
typename lazy_enable_if_c<
|
|
is_vec<A>::value &&
|
|
!qvm_detail::minus_v_defined<vec_traits<A>::dim>::value,
|
|
deduce_vec<A> >::type
|
|
operator-( A const & a )
|
|
{
|
|
typedef typename deduce_vec<A>::type R;
|
|
R r;
|
|
for( int i=0; i!=vec_traits<A>::dim; ++i )
|
|
vec_traits<R>::write_element_idx(i,r)=-vec_traits<A>::read_element_idx(i,a);
|
|
return r;
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <int D>
|
|
struct
|
|
minus_vv_defined
|
|
{
|
|
static bool const value=false;
|
|
};
|
|
}
|
|
|
|
template <class A,class B>
|
|
BOOST_QVM_INLINE_OPERATIONS
|
|
typename lazy_enable_if_c<
|
|
is_vec<A>::value && is_vec<B>::value &&
|
|
vec_traits<A>::dim==vec_traits<B>::dim &&
|
|
!qvm_detail::minus_vv_defined<vec_traits<A>::dim>::value,
|
|
deduce_vec2<A,B,vec_traits<A>::dim> >::type
|
|
operator-( A const & a, B const & b )
|
|
{
|
|
typedef typename deduce_vec2<A,B,vec_traits<A>::dim>::type R;
|
|
R r;
|
|
for( int i=0; i!=vec_traits<A>::dim; ++i )
|
|
vec_traits<R>::write_element_idx(i,r)=vec_traits<A>::read_element_idx(i,a)-vec_traits<B>::read_element_idx(i,b);
|
|
return r;
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <int D>
|
|
struct
|
|
mul_eq_vs_defined
|
|
{
|
|
static bool const value=false;
|
|
};
|
|
}
|
|
|
|
template <class A,class B>
|
|
BOOST_QVM_INLINE_OPERATIONS
|
|
typename enable_if_c<
|
|
is_vec<A>::value && is_scalar<B>::value &&
|
|
!qvm_detail::mul_eq_vs_defined<vec_traits<A>::dim>::value,
|
|
A &>::type
|
|
operator*=( A & a, B b )
|
|
{
|
|
for( int i=0; i!=vec_traits<A>::dim; ++i )
|
|
vec_traits<A>::write_element_idx(i,a)*=b;
|
|
return a;
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <int D>
|
|
struct
|
|
mul_vs_defined
|
|
{
|
|
static bool const value=false;
|
|
};
|
|
}
|
|
|
|
template <class A,class B>
|
|
BOOST_QVM_INLINE_OPERATIONS
|
|
typename lazy_enable_if_c<
|
|
is_vec<A>::value && is_scalar<B>::value &&
|
|
!qvm_detail::mul_vs_defined<vec_traits<A>::dim>::value,
|
|
deduce_vec<A> >::type
|
|
operator*( A const & a, B b )
|
|
{
|
|
typedef typename deduce_vec<A>::type R;
|
|
R r;
|
|
for( int i=0; i!=vec_traits<A>::dim; ++i )
|
|
vec_traits<R>::write_element_idx(i,r)=vec_traits<A>::read_element_idx(i,a)*b;
|
|
return r;
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <int D>
|
|
struct
|
|
neq_vv_defined
|
|
{
|
|
static bool const value=false;
|
|
};
|
|
}
|
|
|
|
template <class A,class B>
|
|
BOOST_QVM_INLINE_OPERATIONS
|
|
typename enable_if_c<
|
|
is_vec<A>::value && is_vec<B>::value &&
|
|
vec_traits<A>::dim==vec_traits<B>::dim &&
|
|
!qvm_detail::neq_vv_defined<vec_traits<A>::dim>::value,
|
|
bool>::type
|
|
operator!=( A const & a, B const & b )
|
|
{
|
|
for( int i=0; i!=vec_traits<A>::dim; ++i )
|
|
if( vec_traits<A>::read_element_idx(i,a)!=vec_traits<B>::read_element_idx(i,b) )
|
|
return true;
|
|
return false;
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <int D>
|
|
struct
|
|
normalize_v_defined
|
|
{
|
|
static bool const value=false;
|
|
};
|
|
}
|
|
|
|
template <class A>
|
|
BOOST_QVM_INLINE_OPERATIONS
|
|
typename lazy_enable_if_c<
|
|
is_vec<A>::value &&
|
|
!qvm_detail::normalize_v_defined<vec_traits<A>::dim>::value,
|
|
deduce_vec<A> >::type
|
|
normalized( A const & a )
|
|
{
|
|
typedef typename vec_traits<A>::scalar_type T;
|
|
T m(scalar_traits<T>::value(0));
|
|
for( int i=0; i!=vec_traits<A>::dim; ++i )
|
|
{
|
|
T x=vec_traits<A>::read_element_idx(i,a);
|
|
m+=x*x;
|
|
}
|
|
if( m==scalar_traits<T>::value(0) )
|
|
BOOST_QVM_THROW_EXCEPTION(zero_magnitude_error());
|
|
T rm=scalar_traits<T>::value(1)/sqrt<T>(m);
|
|
typedef typename deduce_vec<A>::type R;
|
|
R r;
|
|
for( int i=0; i!=vec_traits<A>::dim; ++i )
|
|
vec_traits<R>::write_element_idx(i,r)=vec_traits<A>::read_element_idx(i,a)*rm;
|
|
return r;
|
|
}
|
|
|
|
template <class A>
|
|
BOOST_QVM_INLINE_OPERATIONS
|
|
typename enable_if_c<
|
|
is_vec<A>::value &&
|
|
!qvm_detail::normalize_v_defined<vec_traits<A>::dim>::value,
|
|
void>::type
|
|
normalize( A & a )
|
|
{
|
|
typedef typename vec_traits<A>::scalar_type T;
|
|
T m(scalar_traits<T>::value(0));
|
|
for( int i=0; i!=vec_traits<A>::dim; ++i )
|
|
{
|
|
T x=vec_traits<A>::read_element_idx(i,a);
|
|
m+=x*x;
|
|
}
|
|
if( m==scalar_traits<T>::value(0) )
|
|
BOOST_QVM_THROW_EXCEPTION(zero_magnitude_error());
|
|
T rm=scalar_traits<T>::value(1)/sqrt<T>(m);
|
|
for( int i=0; i!=vec_traits<A>::dim; ++i )
|
|
vec_traits<A>::write_element_idx(i,a)*=rm;
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <int D>
|
|
struct
|
|
plus_eq_vv_defined
|
|
{
|
|
static bool const value=false;
|
|
};
|
|
}
|
|
|
|
template <class A,class B>
|
|
BOOST_QVM_INLINE_OPERATIONS
|
|
typename enable_if_c<
|
|
is_vec<A>::value && is_vec<B>::value &&
|
|
vec_traits<A>::dim==vec_traits<B>::dim &&
|
|
!qvm_detail::plus_eq_vv_defined<vec_traits<A>::dim>::value,
|
|
A &>::type
|
|
operator+=( A & a, B const & b )
|
|
{
|
|
for( int i=0; i!=vec_traits<A>::dim; ++i )
|
|
vec_traits<A>::write_element_idx(i,a)+=vec_traits<B>::read_element_idx(i,b);
|
|
return a;
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <int D>
|
|
struct
|
|
plus_vv_defined
|
|
{
|
|
static bool const value=false;
|
|
};
|
|
}
|
|
|
|
template <class A,class B>
|
|
BOOST_QVM_INLINE_OPERATIONS
|
|
typename lazy_enable_if_c<
|
|
is_vec<A>::value && is_vec<B>::value &&
|
|
vec_traits<A>::dim==vec_traits<B>::dim &&
|
|
!qvm_detail::plus_vv_defined<vec_traits<A>::dim>::value,
|
|
deduce_vec2<A,B,vec_traits<A>::dim> >::type
|
|
operator+( A const & a, B const & b )
|
|
{
|
|
typedef typename deduce_vec2<A,B,vec_traits<A>::dim>::type R;
|
|
R r;
|
|
for( int i=0; i!=vec_traits<A>::dim; ++i )
|
|
vec_traits<R>::write_element_idx(i,r)=vec_traits<A>::read_element_idx(i,a)+vec_traits<B>::read_element_idx(i,b);
|
|
return r;
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
qvm_detail
|
|
{
|
|
template <class T>
|
|
class
|
|
vref_
|
|
{
|
|
vref_( vref_ const & );
|
|
vref_ & operator=( vref_ const & );
|
|
~vref_();
|
|
|
|
public:
|
|
|
|
template <class R>
|
|
BOOST_QVM_INLINE_TRIVIAL
|
|
vref_ &
|
|
operator=( R const & x )
|
|
{
|
|
assign(*this,x);
|
|
return *this;
|
|
}
|
|
|
|
template <class R>
|
|
BOOST_QVM_INLINE_TRIVIAL
|
|
operator R() const
|
|
{
|
|
R r;
|
|
assign(r,*this);
|
|
return r;
|
|
}
|
|
};
|
|
}
|
|
|
|
template <class V>
|
|
struct
|
|
vec_traits< qvm_detail::vref_<V> >
|
|
{
|
|
typedef typename vec_traits<V>::scalar_type scalar_type;
|
|
typedef qvm_detail::vref_<V> this_vector;
|
|
static int const dim=vec_traits<V>::dim;
|
|
|
|
template <int I>
|
|
static
|
|
BOOST_QVM_INLINE_CRITICAL
|
|
scalar_type
|
|
read_element( this_vector const & x )
|
|
{
|
|
BOOST_QVM_STATIC_ASSERT(I>=0);
|
|
BOOST_QVM_STATIC_ASSERT(I<dim);
|
|
return vec_traits<V>::template read_element<I>(reinterpret_cast<V const &>(x));
|
|
}
|
|
|
|
template <int I>
|
|
static
|
|
BOOST_QVM_INLINE_CRITICAL
|
|
scalar_type &
|
|
write_element( this_vector & x )
|
|
{
|
|
BOOST_QVM_STATIC_ASSERT(I>=0);
|
|
BOOST_QVM_STATIC_ASSERT(I<dim);
|
|
return vec_traits<V>::template write_element<I>(reinterpret_cast<V &>(x));
|
|
}
|
|
|
|
static
|
|
BOOST_QVM_INLINE_CRITICAL
|
|
scalar_type
|
|
read_element_idx( int i, this_vector const & x )
|
|
{
|
|
BOOST_QVM_ASSERT(i>=0);
|
|
BOOST_QVM_ASSERT(i<dim);
|
|
return vec_traits<V>::read_element_idx(i,reinterpret_cast<V const &>(x));
|
|
}
|
|
|
|
static
|
|
BOOST_QVM_INLINE_CRITICAL
|
|
scalar_type &
|
|
write_element_idx( int i, this_vector & x )
|
|
{
|
|
BOOST_QVM_ASSERT(i>=0);
|
|
BOOST_QVM_ASSERT(i<dim);
|
|
return vec_traits<V>::write_element_idx(i,reinterpret_cast<V &>(x));
|
|
}
|
|
};
|
|
|
|
template <class V,int D>
|
|
struct
|
|
deduce_vec<qvm_detail::vref_<V>,D>
|
|
{
|
|
typedef vec<typename vec_traits<V>::scalar_type,D> type;
|
|
};
|
|
|
|
template <class V>
|
|
BOOST_QVM_INLINE_TRIVIAL
|
|
typename enable_if_c<
|
|
is_vec<V>::value,
|
|
qvm_detail::vref_<V> const &>::type
|
|
vref( V const & a )
|
|
{
|
|
return reinterpret_cast<qvm_detail::vref_<V> const &>(a);
|
|
}
|
|
|
|
template <class V>
|
|
BOOST_QVM_INLINE_TRIVIAL
|
|
typename enable_if_c<
|
|
is_vec<V>::value,
|
|
qvm_detail::vref_<V> &>::type
|
|
vref( V & a )
|
|
{
|
|
return reinterpret_cast<qvm_detail::vref_<V> &>(a);
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
|
|
namespace
|
|
sfinae
|
|
{
|
|
using ::boost::qvm::to_string;
|
|
using ::boost::qvm::assign;
|
|
using ::boost::qvm::convert_to;
|
|
using ::boost::qvm::cross;
|
|
using ::boost::qvm::cmp;
|
|
using ::boost::qvm::set_zero;
|
|
using ::boost::qvm::scalar_cast;
|
|
using ::boost::qvm::operator/=;
|
|
using ::boost::qvm::operator/;
|
|
using ::boost::qvm::dot;
|
|
using ::boost::qvm::operator==;
|
|
using ::boost::qvm::mag_sqr;
|
|
using ::boost::qvm::mag;
|
|
using ::boost::qvm::operator-=;
|
|
using ::boost::qvm::operator-;
|
|
using ::boost::qvm::operator*=;
|
|
using ::boost::qvm::operator*;
|
|
using ::boost::qvm::operator!=;
|
|
using ::boost::qvm::normalized;
|
|
using ::boost::qvm::normalize;
|
|
using ::boost::qvm::operator+=;
|
|
using ::boost::qvm::operator+;
|
|
using ::boost::qvm::vref;
|
|
}
|
|
|
|
////////////////////////////////////////////////
|
|
}
|
|
}
|
|
|
|
#endif
|