diff options
author | 2007-06-05 08:44:53 +0000 | |
---|---|---|
committer | 2007-06-05 08:44:53 +0000 | |
commit | 6fe6a81839a7f881d810ccea5253e3d1928b53ca (patch) | |
tree | 8429c0b78e633c49acd2b47bbc5238f2c9ae2531 | |
parent | e3a45173b50f698591071fdd38e511bd5a8d2ea8 (diff) |
Fix enough stuff, and remove enough dead stuff, to make a simple test program compile
23 files changed, 35 insertions, 2856 deletions
diff --git a/tvmet-1.7.1/include/tvmet/Io.h b/tvmet-1.7.1/include/tvmet/Io.h index de7905c05..7aef92ddf 100644 --- a/tvmet-1.7.1/include/tvmet/Io.h +++ b/tvmet-1.7.1/include/tvmet/Io.h @@ -43,7 +43,7 @@ class IoPrintHelper { private: static std::streamsize width(const C& e) { - std::streamsize w = static_cast<std::streamsize>(std::log10(max(abs(e)))+1); + std::streamsize w = static_cast<std::streamsize>(10); //FIXME arbitrary value return w > 0 ? w : 0; } diff --git a/tvmet-1.7.1/include/tvmet/MatrixImpl.h b/tvmet-1.7.1/include/tvmet/MatrixImpl.h index 738daaec7..8704366fc 100644 --- a/tvmet-1.7.1/include/tvmet/MatrixImpl.h +++ b/tvmet-1.7.1/include/tvmet/MatrixImpl.h @@ -71,7 +71,6 @@ std::ostream& Matrix<T, NRows, NCols>::print_on(std::ostream& os) const return os; } - /* * member operators with scalars, per se element wise */ diff --git a/tvmet-1.7.1/include/tvmet/MatrixOperators.h b/tvmet-1.7.1/include/tvmet/MatrixOperators.h index 372c5fe3d..b1000fedc 100644 --- a/tvmet-1.7.1/include/tvmet/MatrixOperators.h +++ b/tvmet-1.7.1/include/tvmet/MatrixOperators.h @@ -66,16 +66,6 @@ namespace element_wise { TVMET_DECLARE_MACRO(div_eq, /=) // not defined for vectors } -// integer operators only, e.g used on double you wil get an error -namespace element_wise { - TVMET_DECLARE_MACRO(mod_eq, %=) - TVMET_DECLARE_MACRO(xor_eq, ^=) - TVMET_DECLARE_MACRO(and_eq, &=) - TVMET_DECLARE_MACRO(or_eq, |=) - TVMET_DECLARE_MACRO(shl_eq, <<=) - TVMET_DECLARE_MACRO(shr_eq, >>=) -} - #undef TVMET_DECLARE_MACRO @@ -327,235 +317,6 @@ operator*(const XprMatrix<E1, Rows, Cols>& lhs, /*++++++++++++++++++++++++++++++++++++++++++++++++++++++++ - * Matrix integer and compare operators - *+++++++++++++++++++++++++++++++++++++++++++++++++++++++*/ - - -/* - * operator(Matrix<T1, Rows, Cols>, Matrix<T2, Rows, Cols>) - * operator(XprMatrix<E>, Matrix<T, Rows, Cols>) - * operator(Matrix<T, Rows, Cols>, XprMatrix<E>) - * Note: operations are per se element wise - */ -#define TVMET_DECLARE_MACRO(NAME, OP) \ -template<class T1, int Rows, int Cols, \ - class T2> \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME<T1, T2>, \ - MatrixConstReference<T1, Rows, Cols>, \ - MatrixConstReference<T2, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -operator OP (const Matrix<T1, Rows, Cols>& lhs, \ - const Matrix<T2, Rows, Cols>& rhs) TVMET_CXX_ALWAYS_INLINE; \ - \ -template<class E, \ - class T, int Rows, int Cols> \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME<typename E::value_type, T>, \ - XprMatrix<E, Rows, Cols>, \ - MatrixConstReference<T, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -operator OP (const XprMatrix<E, Rows, Cols>& lhs, \ - const Matrix<T, Rows, Cols>& rhs) TVMET_CXX_ALWAYS_INLINE; \ - \ -template<class T, int Rows, int Cols, \ - class E> \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME<typename E::value_type, T>, \ - MatrixConstReference<T, Rows, Cols>, \ - XprMatrix<E, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -operator OP (const Matrix<T, Rows, Cols>& lhs, \ - const XprMatrix<E, Rows, Cols>& rhs) TVMET_CXX_ALWAYS_INLINE; - -// integer operators only, e.g used on double you wil get an error -namespace element_wise { - TVMET_DECLARE_MACRO(mod, %) - TVMET_DECLARE_MACRO(bitxor, ^) - TVMET_DECLARE_MACRO(bitand, &) - TVMET_DECLARE_MACRO(bitor, |) - TVMET_DECLARE_MACRO(shl, <<) - TVMET_DECLARE_MACRO(shr, >>) -} - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >) -TVMET_DECLARE_MACRO(less, <) -TVMET_DECLARE_MACRO(greater_eq, >=) -TVMET_DECLARE_MACRO(less_eq, <=) -TVMET_DECLARE_MACRO(eq, ==) -TVMET_DECLARE_MACRO(not_eq, !=) -TVMET_DECLARE_MACRO(and, &&) -TVMET_DECLARE_MACRO(or, ||) - -#undef TVMET_DECLARE_MACRO - - -#if defined(TVMET_HAVE_COMPLEX) -/* - * operator(Matrix<T, Rows, Cols>, complex<T>) - * operator(complex<T>, Matrix<T, Rows, Cols>) - * Note: - per se element wise - * - bit ops on complex<int> doesn't make sense, stay away - * \todo type promotion - */ -#define TVMET_DECLARE_MACRO(NAME, OP) \ -template<class T, int Rows, int Cols> \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME< std::complex<T>, std::complex<T> >, \ - MatrixConstReference< std::complex<T>, Rows, Cols>, \ - XprLiteral<std::complex<T> > \ - >, \ - Rows, Cols \ -> \ -operator OP (const Matrix< std::complex<T>, Rows, Cols>& lhs, \ - const std::complex<T>& rhs) TVMET_CXX_ALWAYS_INLINE; \ - \ -template<class T, int Rows, int Cols> \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME< std::complex<T>, std::complex<T> >, \ - XprLiteral< std::complex<T> >, \ - MatrixConstReference< std::complex<T>, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -operator OP (const std::complex<T>& lhs, \ - const Matrix< std::complex<T>, Rows, Cols>& rhs) TVMET_CXX_ALWAYS_INLINE; - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >) -TVMET_DECLARE_MACRO(less, <) -TVMET_DECLARE_MACRO(greater_eq, >=) -TVMET_DECLARE_MACRO(less_eq, <=) -TVMET_DECLARE_MACRO(eq, ==) -TVMET_DECLARE_MACRO(not_eq, !=) -TVMET_DECLARE_MACRO(and, &&) -TVMET_DECLARE_MACRO(or, ||) - -#undef TVMET_DECLARE_MACRO - -#endif // defined(TVMET_HAVE_COMPLEX) - - -/* - * operator(Matrix<T, Rows, Cols>, POD) - * operator(POD, Matrix<T, Rows, Cols>) - * Note: operations are per se element wise - */ -#define TVMET_DECLARE_MACRO(NAME, OP, TP) \ -template<class T, int Rows, int Cols> \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME<T, TP >, \ - MatrixConstReference<T, Rows, Cols>, \ - XprLiteral<TP > \ - >, \ - Rows, Cols \ -> \ -operator OP (const Matrix<T, Rows, Cols>& lhs, TP rhs) TVMET_CXX_ALWAYS_INLINE; \ - \ -template<class T, int Rows, int Cols> \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME< TP, T>, \ - XprLiteral< TP >, \ - MatrixConstReference<T, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -operator OP (TP lhs, const Matrix<T, Rows, Cols>& rhs) TVMET_CXX_ALWAYS_INLINE; - -// integer operators only, e.g used on double you wil get an error -namespace element_wise { - TVMET_DECLARE_MACRO(mod, %, int) - TVMET_DECLARE_MACRO(bitxor, ^, int) - TVMET_DECLARE_MACRO(bitand, &, int) - TVMET_DECLARE_MACRO(bitor, |, int) - TVMET_DECLARE_MACRO(shl, <<, int) - TVMET_DECLARE_MACRO(shr, >>, int) -} - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, int) -TVMET_DECLARE_MACRO(less, <, int) -TVMET_DECLARE_MACRO(greater_eq, >=, int) -TVMET_DECLARE_MACRO(less_eq, <=, int) -TVMET_DECLARE_MACRO(eq, ==, int) -TVMET_DECLARE_MACRO(not_eq, !=, int) -TVMET_DECLARE_MACRO(and, &&, int) -TVMET_DECLARE_MACRO(or, ||, int) - -#if defined(TVMET_HAVE_LONG_LONG) -// integer operators only -namespace element_wise { - TVMET_DECLARE_MACRO(mod, %, long long int) - TVMET_DECLARE_MACRO(bitxor, ^, long long int) - TVMET_DECLARE_MACRO(bitand, &, long long int) - TVMET_DECLARE_MACRO(bitor, |, long long int) - TVMET_DECLARE_MACRO(shl, <<, long long int) - TVMET_DECLARE_MACRO(shr, >>, long long int) -} - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, long long int) -TVMET_DECLARE_MACRO(less, <, long long int) -TVMET_DECLARE_MACRO(greater_eq, >=, long long int) -TVMET_DECLARE_MACRO(less_eq, <=, long long int) -TVMET_DECLARE_MACRO(eq, ==, long long int) -TVMET_DECLARE_MACRO(not_eq, !=, long long int) -TVMET_DECLARE_MACRO(and, &&, long long int) -TVMET_DECLARE_MACRO(or, ||, long long int) -#endif // defined(TVMET_HAVE_LONG_LONG) - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, float) -TVMET_DECLARE_MACRO(less, <, float) -TVMET_DECLARE_MACRO(greater_eq, >=, float) -TVMET_DECLARE_MACRO(less_eq, <=, float) -TVMET_DECLARE_MACRO(eq, ==, float) -TVMET_DECLARE_MACRO(not_eq, !=, float) -TVMET_DECLARE_MACRO(and, &&, float) -TVMET_DECLARE_MACRO(or, ||, float) - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, double) -TVMET_DECLARE_MACRO(less, <, double) -TVMET_DECLARE_MACRO(greater_eq, >=, double) -TVMET_DECLARE_MACRO(less_eq, <=, double) -TVMET_DECLARE_MACRO(eq, ==, double) -TVMET_DECLARE_MACRO(not_eq, !=, double) -TVMET_DECLARE_MACRO(and, &&, double) -TVMET_DECLARE_MACRO(or, ||, double) - -#if defined(TVMET_HAVE_LONG_DOUBLE) -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, long double) -TVMET_DECLARE_MACRO(less, <, long double) -TVMET_DECLARE_MACRO(greater_eq, >=, long double) -TVMET_DECLARE_MACRO(less_eq, <=, long double) -TVMET_DECLARE_MACRO(eq, ==, long double) -TVMET_DECLARE_MACRO(not_eq, !=, long double) -TVMET_DECLARE_MACRO(and, &&, long double) -TVMET_DECLARE_MACRO(or, ||, long double) -#endif // defined(TVMET_HAVE_LONG_DOUBLE) - -#undef TVMET_DECLARE_MACRO - - - - -/*++++++++++++++++++++++++++++++++++++++++++++++++++++++++ * global unary operators *+++++++++++++++++++++++++++++++++++++++++++++++++++++++*/ @@ -575,8 +336,6 @@ XprMatrix< \ > \ operator OP (const Matrix<T, Rows, Cols>& rhs) TVMET_CXX_ALWAYS_INLINE; -TVMET_DECLARE_MACRO(not, !) -TVMET_DECLARE_MACRO(compl, ~) TVMET_DECLARE_MACRO(neg, -) #undef TVMET_DECLARE_MACRO @@ -631,16 +390,6 @@ namespace element_wise { TVMET_IMPLEMENT_MACRO(div_eq, /=) // not defined for vectors } -// integer operators only, e.g used on double you wil get an error -namespace element_wise { - TVMET_IMPLEMENT_MACRO(mod_eq, %=) - TVMET_IMPLEMENT_MACRO(xor_eq, ^=) - TVMET_IMPLEMENT_MACRO(and_eq, &=) - TVMET_IMPLEMENT_MACRO(or_eq, |=) - TVMET_IMPLEMENT_MACRO(shl_eq, <<=) - TVMET_IMPLEMENT_MACRO(shr_eq, >>=) -} - #undef TVMET_IMPLEMENT_MACRO @@ -958,293 +707,6 @@ operator*(const XprMatrix<E1, Rows, Cols>& lhs, const Vector<T2, Cols>& rhs) { /*++++++++++++++++++++++++++++++++++++++++++++++++++++++++ - * Matrix integer and compare operators - *+++++++++++++++++++++++++++++++++++++++++++++++++++++++*/ - - -/* - * operator(Matrix<T1, Rows, Cols>, Matrix<T2, Rows, Cols>) - * operator(XprMatrix<E>, Matrix<T, Rows, Cols>) - * operator(Matrix<T, Rows, Cols>, XprMatrix<E>) - * Note: operations are per se element wise - */ -#define TVMET_IMPLEMENT_MACRO(NAME, OP) \ -template<class T1, int Rows, int Cols, \ - class T2> \ -inline \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME<T1, T2>, \ - MatrixConstReference<T1, Rows, Cols>, \ - MatrixConstReference<T2, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -operator OP (const Matrix<T1, Rows, Cols>& lhs, \ - const Matrix<T2, Rows, Cols>& rhs) { \ - typedef XprBinOp < \ - Fcnl_##NAME<T1, T2>, \ - MatrixConstReference<T1, Rows, Cols>, \ - MatrixConstReference<T2, Rows, Cols> \ - > expr_type; \ - return XprMatrix<expr_type, Rows, Cols>(expr_type(lhs.const_ref(), rhs.const_ref())); \ -} \ - \ -template<class E, \ - class T, int Rows, int Cols> \ -inline \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME<typename E::value_type, T>, \ - XprMatrix<E, Rows, Cols>, \ - MatrixConstReference<T, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -operator OP (const XprMatrix<E, Rows, Cols>& lhs, const Matrix<T, Rows, Cols>& rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME<typename E::value_type, T>, \ - XprMatrix<E, Rows, Cols>, \ - MatrixConstReference<T, Rows, Cols> \ - > expr_type; \ - return XprMatrix<expr_type, Rows, Cols>(expr_type(lhs, rhs.const_ref())); \ -} \ - \ -template<class T, int Rows, int Cols, \ - class E> \ -inline \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME<typename E::value_type, T>, \ - MatrixConstReference<T, Rows, Cols>, \ - XprMatrix<E, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -operator OP (const Matrix<T, Rows, Cols>& lhs, const XprMatrix<E, Rows, Cols>& rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME<T, typename E::value_type>, \ - MatrixConstReference<T, Rows, Cols>, \ - XprMatrix<E, Rows, Cols> \ - > expr_type; \ - return XprMatrix<expr_type, Rows, Cols>(expr_type(lhs.const_ref(), rhs)); \ -} - -// integer operators only, e.g used on double you wil get an error -namespace element_wise { - TVMET_IMPLEMENT_MACRO(mod, %) - TVMET_IMPLEMENT_MACRO(bitxor, ^) - TVMET_IMPLEMENT_MACRO(bitand, &) - TVMET_IMPLEMENT_MACRO(bitor, |) - TVMET_IMPLEMENT_MACRO(shl, <<) - TVMET_IMPLEMENT_MACRO(shr, >>) -} - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >) -TVMET_IMPLEMENT_MACRO(less, <) -TVMET_IMPLEMENT_MACRO(greater_eq, >=) -TVMET_IMPLEMENT_MACRO(less_eq, <=) -TVMET_IMPLEMENT_MACRO(eq, ==) -TVMET_IMPLEMENT_MACRO(not_eq, !=) -TVMET_IMPLEMENT_MACRO(and, &&) -TVMET_IMPLEMENT_MACRO(or, ||) - -#undef TVMET_IMPLEMENT_MACRO - - -#if defined(TVMET_HAVE_COMPLEX) -/* - * operator(Matrix<T, Rows, Cols>, complex<T>) - * operator(complex<T>, Matrix<T, Rows, Cols>) - * Note: - per se element wise - * - bit ops on complex<int> doesn't make sense, stay away - * \todo type promotion - */ -#define TVMET_IMPLEMENT_MACRO(NAME, OP) \ -template<class T, int Rows, int Cols> \ -inline \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME< std::complex<T>, std::complex<T> >, \ - MatrixConstReference< std::complex<T>, Rows, Cols>, \ - XprLiteral<std::complex<T> > \ - >, \ - Rows, Cols \ -> \ -operator OP (const Matrix< std::complex<T>, Rows, Cols>& lhs, \ - const std::complex<T>& rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME< std::complex<T>, std::complex<T> >, \ - MatrixConstReference< std::complex<T>, Rows, Cols>, \ - XprLiteral< std::complex<T> > \ - > expr_type; \ - return XprMatrix<expr_type, Rows, Cols>( \ - expr_type(lhs.const_ref(), XprLiteral< std::complex<T> >(rhs))); \ -} \ - \ -template<class T, int Rows, int Cols> \ -inline \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME< std::complex<T>, std::complex<T> >, \ - XprLiteral< std::complex<T> >, \ - MatrixConstReference< std::complex<T>, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -operator OP (const std::complex<T>& lhs, \ - const Matrix< std::complex<T>, Rows, Cols>& rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME< std::complex<T>, std::complex<T> >, \ - XprLiteral< std::complex<T> >, \ - MatrixConstReference<T, Rows, Cols> \ - > expr_type; \ - return XprMatrix<expr_type, Rows, Cols>( \ - expr_type(XprLiteral< std::complex<T> >(lhs), rhs.const_ref())); \ -} - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >) -TVMET_IMPLEMENT_MACRO(less, <) -TVMET_IMPLEMENT_MACRO(greater_eq, >=) -TVMET_IMPLEMENT_MACRO(less_eq, <=) -TVMET_IMPLEMENT_MACRO(eq, ==) -TVMET_IMPLEMENT_MACRO(not_eq, !=) -TVMET_IMPLEMENT_MACRO(and, &&) -TVMET_IMPLEMENT_MACRO(or, ||) - -#undef TVMET_IMPLEMENT_MACRO - -#endif // defined(TVMET_HAVE_COMPLEX) - - -/* - * operator(Matrix<T, Rows, Cols>, POD) - * operator(POD, Matrix<T, Rows, Cols>) - * Note: operations are per se element wise - */ -#define TVMET_IMPLEMENT_MACRO(NAME, OP, TP) \ -template<class T, int Rows, int Cols> \ -inline \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME<T, TP >, \ - MatrixConstReference<T, Rows, Cols>, \ - XprLiteral<TP > \ - >, \ - Rows, Cols \ -> \ -operator OP (const Matrix<T, Rows, Cols>& lhs, TP rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME<T, TP >, \ - MatrixConstReference<T, Rows, Cols>, \ - XprLiteral< TP > \ - > expr_type; \ - return XprMatrix<expr_type, Rows, Cols>( \ - expr_type(lhs.const_ref(), XprLiteral< TP >(rhs))); \ -} \ - \ -template<class T, int Rows, int Cols> \ -inline \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME< TP, T>, \ - XprLiteral< TP >, \ - MatrixConstReference<T, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -operator OP (TP lhs, const Matrix<T, Rows, Cols>& rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME< TP, T>, \ - XprLiteral< TP >, \ - MatrixConstReference<T, Rows, Cols> \ - > expr_type; \ - return XprMatrix<expr_type, Rows, Cols>( \ - expr_type(XprLiteral< TP >(lhs), rhs.const_ref())); \ -} - -// integer operators only, e.g used on double you wil get an error -namespace element_wise { - TVMET_IMPLEMENT_MACRO(mod, %, int) - TVMET_IMPLEMENT_MACRO(bitxor, ^, int) - TVMET_IMPLEMENT_MACRO(bitand, &, int) - TVMET_IMPLEMENT_MACRO(bitor, |, int) - TVMET_IMPLEMENT_MACRO(shl, <<, int) - TVMET_IMPLEMENT_MACRO(shr, >>, int) -} - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, int) -TVMET_IMPLEMENT_MACRO(less, <, int) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, int) -TVMET_IMPLEMENT_MACRO(less_eq, <=, int) -TVMET_IMPLEMENT_MACRO(eq, ==, int) -TVMET_IMPLEMENT_MACRO(not_eq, !=, int) -TVMET_IMPLEMENT_MACRO(and, &&, int) -TVMET_IMPLEMENT_MACRO(or, ||, int) - -#if defined(TVMET_HAVE_LONG_LONG) -// integer operators only -namespace element_wise { - TVMET_IMPLEMENT_MACRO(mod, %, long long int) - TVMET_IMPLEMENT_MACRO(bitxor, ^, long long int) - TVMET_IMPLEMENT_MACRO(bitand, &, long long int) - TVMET_IMPLEMENT_MACRO(bitor, |, long long int) - TVMET_IMPLEMENT_MACRO(shl, <<, long long int) - TVMET_IMPLEMENT_MACRO(shr, >>, long long int) -} - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, long long int) -TVMET_IMPLEMENT_MACRO(less, <, long long int) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, long long int) -TVMET_IMPLEMENT_MACRO(less_eq, <=, long long int) -TVMET_IMPLEMENT_MACRO(eq, ==, long long int) -TVMET_IMPLEMENT_MACRO(not_eq, !=, long long int) -TVMET_IMPLEMENT_MACRO(and, &&, long long int) -TVMET_IMPLEMENT_MACRO(or, ||, long long int) -#endif // defined(TVMET_HAVE_LONG_LONG) - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, float) -TVMET_IMPLEMENT_MACRO(less, <, float) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, float) -TVMET_IMPLEMENT_MACRO(less_eq, <=, float) -TVMET_IMPLEMENT_MACRO(eq, ==, float) -TVMET_IMPLEMENT_MACRO(not_eq, !=, float) -TVMET_IMPLEMENT_MACRO(and, &&, float) -TVMET_IMPLEMENT_MACRO(or, ||, float) - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, double) -TVMET_IMPLEMENT_MACRO(less, <, double) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, double) -TVMET_IMPLEMENT_MACRO(less_eq, <=, double) -TVMET_IMPLEMENT_MACRO(eq, ==, double) -TVMET_IMPLEMENT_MACRO(not_eq, !=, double) -TVMET_IMPLEMENT_MACRO(and, &&, double) -TVMET_IMPLEMENT_MACRO(or, ||, double) - -#if defined(TVMET_HAVE_LONG_DOUBLE) -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, long double) -TVMET_IMPLEMENT_MACRO(less, <, long double) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, long double) -TVMET_IMPLEMENT_MACRO(less_eq, <=, long double) -TVMET_IMPLEMENT_MACRO(eq, ==, long double) -TVMET_IMPLEMENT_MACRO(not_eq, !=, long double) -TVMET_IMPLEMENT_MACRO(and, &&, long double) -TVMET_IMPLEMENT_MACRO(or, ||, long double) -#endif // defined(TVMET_HAVE_LONG_DOUBLE) - -#undef TVMET_IMPLEMENT_MACRO - - - - -/*++++++++++++++++++++++++++++++++++++++++++++++++++++++++ * global unary operators *+++++++++++++++++++++++++++++++++++++++++++++++++++++++*/ @@ -1271,8 +733,6 @@ operator OP (const Matrix<T, Rows, Cols>& rhs) { \ return XprMatrix<expr_type, Rows, Cols>(expr_type(rhs.const_ref())); \ } -TVMET_IMPLEMENT_MACRO(not, !) -TVMET_IMPLEMENT_MACRO(compl, ~) TVMET_IMPLEMENT_MACRO(neg, -) #undef TVMET_IMPLEMENT_MACRO diff --git a/tvmet-1.7.1/include/tvmet/MatrixUnaryFunctions.h b/tvmet-1.7.1/include/tvmet/MatrixUnaryFunctions.h index 2300977a4..39c3e92bc 100644 --- a/tvmet-1.7.1/include/tvmet/MatrixUnaryFunctions.h +++ b/tvmet-1.7.1/include/tvmet/MatrixUnaryFunctions.h @@ -26,71 +26,6 @@ namespace tvmet { - -/********************************************************* - * PART I: DECLARATION - *********************************************************/ - -/* - * unary_function(Matrix<T, Rows, Cols>) - */ -#define TVMET_DECLARE_MACRO(NAME) \ -template<class T, int Rows, int Cols> \ -inline \ -XprMatrix< \ - XprUnOp< \ - Fcnl_##NAME<T>, \ - MatrixConstReference<T, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -NAME(const Matrix<T, Rows, Cols>& rhs) TVMET_CXX_ALWAYS_INLINE; - -TVMET_DECLARE_MACRO(abs) -TVMET_DECLARE_MACRO(cbrt) -TVMET_DECLARE_MACRO(ceil) -TVMET_DECLARE_MACRO(floor) -TVMET_DECLARE_MACRO(rint) -TVMET_DECLARE_MACRO(sin) -TVMET_DECLARE_MACRO(cos) -TVMET_DECLARE_MACRO(tan) -TVMET_DECLARE_MACRO(sinh) -TVMET_DECLARE_MACRO(cosh) -TVMET_DECLARE_MACRO(tanh) -TVMET_DECLARE_MACRO(asin) -TVMET_DECLARE_MACRO(acos) -TVMET_DECLARE_MACRO(atan) -TVMET_DECLARE_MACRO(exp) -TVMET_DECLARE_MACRO(log) -TVMET_DECLARE_MACRO(log10) -TVMET_DECLARE_MACRO(sqrt) - -#if defined(TVMET_HAVE_IEEE_MATH) -TVMET_DECLARE_MACRO(asinh) -TVMET_DECLARE_MACRO(acosh) -TVMET_DECLARE_MACRO(atanh) -TVMET_DECLARE_MACRO(expm1) -TVMET_DECLARE_MACRO(log1p) -TVMET_DECLARE_MACRO(erf) -TVMET_DECLARE_MACRO(erfc) -TVMET_DECLARE_MACRO(j0) -TVMET_DECLARE_MACRO(j1) -TVMET_DECLARE_MACRO(y0) -TVMET_DECLARE_MACRO(y1) -TVMET_DECLARE_MACRO(lgamma) -/** \todo isnan etc. - default return is only an int! */ -#if !defined(TVMET_NO_IEEE_MATH_ISNAN) -TVMET_DECLARE_MACRO(isnan) -#endif -#if !defined(TVMET_NO_IEEE_MATH_ISINF) -TVMET_DECLARE_MACRO(isinf) -#endif -TVMET_DECLARE_MACRO(finite) -#endif // defined(TVMET_HAVE_IEEE_MATH) - -#undef TVMET_DECLARE_MACRO - - /* * unary_function(Matrix<std::complex<T>, Rows, Cols>) */ @@ -109,86 +44,12 @@ NAME(const Matrix<std::complex<T>, Rows, Cols>& rhs) TVMET_CXX_ALWAYS_INLINE; TVMET_DECLARE_MACRO(real) TVMET_DECLARE_MACRO(imag) -TVMET_DECLARE_MACRO(arg) -TVMET_DECLARE_MACRO(norm) TVMET_DECLARE_MACRO(conj) #undef TVMET_DECLARE_MACRO #endif // defined(TVMET_HAVE_COMPLEX) - -/********************************************************* - * PART II: IMPLEMENTATION - *********************************************************/ - - -/* - * unary_function(Matrix<T, Rows, Cols>) - */ -#define TVMET_IMPLEMENT_MACRO(NAME) \ -template<class T, int Rows, int Cols> \ -inline \ -XprMatrix< \ - XprUnOp< \ - Fcnl_##NAME<T>, \ - MatrixConstReference<T, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -NAME(const Matrix<T, Rows, Cols>& rhs) { \ - typedef XprUnOp< \ - Fcnl_##NAME<T>, \ - MatrixConstReference<T, Rows, Cols> \ - > expr_type; \ - return XprMatrix<expr_type, Rows, Cols>(expr_type(rhs.const_ref())); \ -} - -TVMET_IMPLEMENT_MACRO(abs) -TVMET_IMPLEMENT_MACRO(cbrt) -TVMET_IMPLEMENT_MACRO(ceil) -TVMET_IMPLEMENT_MACRO(floor) -TVMET_IMPLEMENT_MACRO(rint) -TVMET_IMPLEMENT_MACRO(sin) -TVMET_IMPLEMENT_MACRO(cos) -TVMET_IMPLEMENT_MACRO(tan) -TVMET_IMPLEMENT_MACRO(sinh) -TVMET_IMPLEMENT_MACRO(cosh) -TVMET_IMPLEMENT_MACRO(tanh) -TVMET_IMPLEMENT_MACRO(asin) -TVMET_IMPLEMENT_MACRO(acos) -TVMET_IMPLEMENT_MACRO(atan) -TVMET_IMPLEMENT_MACRO(exp) -TVMET_IMPLEMENT_MACRO(log) -TVMET_IMPLEMENT_MACRO(log10) -TVMET_IMPLEMENT_MACRO(sqrt) - -#if defined(TVMET_HAVE_IEEE_MATH) -TVMET_IMPLEMENT_MACRO(asinh) -TVMET_IMPLEMENT_MACRO(acosh) -TVMET_IMPLEMENT_MACRO(atanh) -TVMET_IMPLEMENT_MACRO(expm1) -TVMET_IMPLEMENT_MACRO(log1p) -TVMET_IMPLEMENT_MACRO(erf) -TVMET_IMPLEMENT_MACRO(erfc) -TVMET_IMPLEMENT_MACRO(j0) -TVMET_IMPLEMENT_MACRO(j1) -TVMET_IMPLEMENT_MACRO(y0) -TVMET_IMPLEMENT_MACRO(y1) -TVMET_IMPLEMENT_MACRO(lgamma) -/** \todo isnan etc. - default return is only an int! */ -#if !defined(TVMET_NO_IEEE_MATH_ISNAN) -TVMET_IMPLEMENT_MACRO(isnan) -#endif -#if !defined(TVMET_NO_IEEE_MATH_ISINF) -TVMET_IMPLEMENT_MACRO(isinf) -#endif -TVMET_IMPLEMENT_MACRO(finite) -#endif // defined(TVMET_HAVE_IEEE_MATH) - -#undef TVMET_IMPLEMENT_MACRO - - /* * unary_function(Matrix<std::complex<T>, Rows, Cols>) */ @@ -213,8 +74,6 @@ NAME(const Matrix<std::complex<T>, Rows, Cols>& rhs) { \ TVMET_IMPLEMENT_MACRO(real) TVMET_IMPLEMENT_MACRO(imag) -TVMET_IMPLEMENT_MACRO(arg) -TVMET_IMPLEMENT_MACRO(norm) TVMET_IMPLEMENT_MACRO(conj) #undef TVMET_IMPLEMENT_MACRO diff --git a/tvmet-1.7.1/include/tvmet/UnaryFunctionals.h b/tvmet-1.7.1/include/tvmet/UnaryFunctionals.h index fa3176496..4772cc34a 100644 --- a/tvmet-1.7.1/include/tvmet/UnaryFunctionals.h +++ b/tvmet-1.7.1/include/tvmet/UnaryFunctionals.h @@ -26,27 +26,6 @@ namespace tvmet { - -/** - * \class Fcnl_not UnaryFunctionals.h "tvmet/UnaryFunctionals.h" - * \brief unary functional for logical not. - */ -template <class T> -struct Fcnl_not : public UnaryFunctional { - static inline - bool apply_on(T rhs) { - return !rhs; - } - - static - void print_xpr(std::ostream& os, int l=0) { - os << IndentLevel(l) << "Fcnl_not<T=" - << typeid(T).name() << ">," - << std::endl; - } -}; - - /** \class Fcnl_compl UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ /** \class Fcnl_neg UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ #define TVMET_IMPLEMENT_MACRO(NAME, OP) \ @@ -67,206 +46,15 @@ struct Fcnl_##NAME : public UnaryFunctional { \ } \ }; -TVMET_IMPLEMENT_MACRO(compl, ~) TVMET_IMPLEMENT_MACRO(neg, -) #undef TVMET_IMPLEMENT_MACRO - -/** \class Fcnl_abs UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_ceil UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_floor UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_sin UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_cos UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_tan UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_sinh UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_cosh UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_tanh UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_asin UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_acos UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_atan UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_exp UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_log UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_log10 UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_sqrt UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -#define TVMET_IMPLEMENT_MACRO(NAME) \ -template <class T> \ -struct Fcnl_##NAME : public UnaryFunctional { \ - typedef T value_type; \ - \ - static inline \ - value_type apply_on(value_type rhs) { \ - return TVMET_STD_SCOPE(NAME)(rhs); \ - } \ - \ - static \ - void print_xpr(std::ostream& os, int l=0) { \ - os << IndentLevel(l) << "Fcnl_" << #NAME << "<T=" \ - << typeid(value_type).name() << ">," \ - << std::endl; \ - } \ -}; - -TVMET_IMPLEMENT_MACRO(abs) // specialized later, see below -TVMET_IMPLEMENT_MACRO(ceil) -TVMET_IMPLEMENT_MACRO(floor) -TVMET_IMPLEMENT_MACRO(sin) -TVMET_IMPLEMENT_MACRO(cos) -TVMET_IMPLEMENT_MACRO(tan) -TVMET_IMPLEMENT_MACRO(sinh) -TVMET_IMPLEMENT_MACRO(cosh) -TVMET_IMPLEMENT_MACRO(tanh) -TVMET_IMPLEMENT_MACRO(asin) -TVMET_IMPLEMENT_MACRO(acos) -TVMET_IMPLEMENT_MACRO(atan) -TVMET_IMPLEMENT_MACRO(exp) -TVMET_IMPLEMENT_MACRO(log) -TVMET_IMPLEMENT_MACRO(log10) -TVMET_IMPLEMENT_MACRO(sqrt) - -#undef TVMET_IMPLEMENT_MACRO - - -/** \class Fcnl_cbrt UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_rint UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -#define TVMET_IMPLEMENT_MACRO(NAME) \ -template <class T> \ -struct Fcnl_##NAME : public UnaryFunctional { \ - typedef T value_type; \ - \ - static inline \ - value_type apply_on(value_type rhs) { \ - return TVMET_GLOBAL_SCOPE(NAME)(rhs); \ - } \ - \ - static \ - void print_xpr(std::ostream& os, int l=0) { \ - os << IndentLevel(l) << "Fcnl_" << #NAME << "<T=" \ - << typeid(value_type).name() << ">," \ - << std::endl; \ - } \ -}; - -TVMET_IMPLEMENT_MACRO(cbrt) -TVMET_IMPLEMENT_MACRO(rint) - -#undef TVMET_IMPLEMENT_MACRO - - -#if defined(TVMET_HAVE_IEEE_MATH) - -/** \class Fcnl_asinh UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_acosh UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_atanh UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_expm1 UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_log1p UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_erf UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_erfc UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_j0 UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_j1 UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_y0 UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_y1 UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_lgamma UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -#define TVMET_IMPLEMENT_MACRO(NAME) \ -template <class T> \ -struct Fcnl_##NAME : public UnaryFunctional { \ - typedef T value_type; \ - \ - static inline \ - value_type apply_on(value_type rhs) { \ - return TVMET_GLOBAL_SCOPE(NAME)(rhs); \ - } \ - \ - static \ - void print_xpr(std::ostream& os, int l=0) { \ - os << IndentLevel(l) << "Fcnl_" << #NAME << "<T=" \ - << typeid(value_type).name() << ">," \ - << std::endl; \ - } \ -}; - -TVMET_IMPLEMENT_MACRO(asinh) -TVMET_IMPLEMENT_MACRO(acosh) -TVMET_IMPLEMENT_MACRO(atanh) -TVMET_IMPLEMENT_MACRO(expm1) -TVMET_IMPLEMENT_MACRO(log1p) -TVMET_IMPLEMENT_MACRO(erf) -TVMET_IMPLEMENT_MACRO(erfc) -TVMET_IMPLEMENT_MACRO(j0) -TVMET_IMPLEMENT_MACRO(j1) -TVMET_IMPLEMENT_MACRO(y0) -TVMET_IMPLEMENT_MACRO(y1) -TVMET_IMPLEMENT_MACRO(lgamma) - -#undef TVMET_IMPLEMENT_MACRO - -#endif // defined(TVMET_HAVE_IEEE_MATH) - - -/** \class Fcnl_abs<long int> UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_abs<long long int> UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_abs<float> UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_abs<double> UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_abs<long double> UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -#define TVMET_IMPLEMENT_MACRO(NAME, POD) \ -template <class T> struct Fcnl_##NAME; \ -template <> \ -struct Fcnl_##NAME< POD > : public UnaryFunctional { \ - typedef POD value_type; \ - \ - static inline \ - value_type apply_on(value_type rhs) { \ - return TVMET_STD_SCOPE(NAME)(rhs); \ - } \ - \ - static \ - void print_xpr(std::ostream& os, int l=0) { \ - os << IndentLevel(l) << "Fcnl_" << #NAME << "<T=" \ - << typeid(value_type).name() << ">," \ - << std::endl; \ - } \ -}; - -TVMET_IMPLEMENT_MACRO(labs, long int) - -#if defined(TVMET_HAVE_LONG_LONG) -TVMET_IMPLEMENT_MACRO(labs, long long int) -#endif - -TVMET_IMPLEMENT_MACRO(fabs, float) -TVMET_IMPLEMENT_MACRO(fabs, double) - -#if defined(TVMET_HAVE_LONG_DOUBLE) -TVMET_IMPLEMENT_MACRO(fabs, long double) -#endif - -#undef TVMET_IMPLEMENT_MACRO - - /* * complex support */ -#if defined(TVMET_HAVE_COMPLEX) -/** - * \class Fcnl_abs< std::complex<T> > UnaryFunctionals.h "tvmet/UnaryFunctionals.h" - */ -template <class T> -struct Fcnl_abs< std::complex<T> > : public UnaryFunctional { - typedef T value_type; - - static inline - value_type apply_on(const std::complex<T>& rhs) { - return std::abs(rhs); - } - - static - void print_xpr(std::ostream& os, int l=0) { - os << IndentLevel(l) << "Fcnl_abs<T=" - << typeid(std::complex<T>).name() << ">," - << std::endl; - } -}; +#if defined(TVMET_HAVE_COMPLEX) /** * \class Fcnl_conj< std::complex<T> > UnaryFunctionals.h "tvmet/UnaryFunctionals.h" @@ -296,8 +84,6 @@ struct Fcnl_conj< std::complex<T> > : public UnaryFunctional { /** \class Fcnl_real< std::complex<T> > UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ /** \class Fcnl_imag< std::complex<T> > UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_arg< std::complex<T> > UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_norm< std::complex<T> > UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ #define TVMET_IMPLEMENT_MACRO(NAME) \ template <class T> struct Fcnl_##NAME; \ template <class T> \ @@ -319,42 +105,11 @@ struct Fcnl_##NAME< std::complex<T> > : public UnaryFunctional { \ TVMET_IMPLEMENT_MACRO(real) TVMET_IMPLEMENT_MACRO(imag) -TVMET_IMPLEMENT_MACRO(arg) -TVMET_IMPLEMENT_MACRO(norm) #undef TVMET_IMPLEMENT_MACRO #endif // defined(TVMET_HAVE_COMPLEX) - -/** \class Fcnl_isnan UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_isinf UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -/** \class Fcnl_finite UnaryFunctionals.h "tvmet/UnaryFunctionals.h" */ -#define TVMET_IMPLEMENT_MACRO(NAME, POD) \ -template <class T> \ -struct Fcnl_##NAME : public UnaryFunctional { \ - typedef T value_type; \ - \ - static inline \ - POD apply_on(T rhs) { \ - return TVMET_GLOBAL_SCOPE(NAME)(rhs); \ - } \ - \ - static \ - void print_xpr(std::ostream& os, int l=0) { \ - os << IndentLevel(l) << "Fcnl_" << #NAME << "<T=" \ - << typeid(POD).name() << ">," \ - << std::endl; \ - } \ -}; - -TVMET_IMPLEMENT_MACRO(isnan, int) -TVMET_IMPLEMENT_MACRO(isinf, int) -TVMET_IMPLEMENT_MACRO(finite, int) - -#undef TVMET_IMPLEMENT_MACRO - - } // namespace tvmet #endif // TVMET_UNARY_FUNCTIONAL_H diff --git a/tvmet-1.7.1/include/tvmet/VectorOperators.h b/tvmet-1.7.1/include/tvmet/VectorOperators.h index 97b678117..04f421399 100644 --- a/tvmet-1.7.1/include/tvmet/VectorOperators.h +++ b/tvmet-1.7.1/include/tvmet/VectorOperators.h @@ -66,16 +66,6 @@ namespace element_wise { TVMET_DECLARE_MACRO(div_eq, /=) // not defined for vectors } -// integer operators only, e.g used on double you wil get an error -namespace element_wise { - TVMET_DECLARE_MACRO(mod_eq, %=) - TVMET_DECLARE_MACRO(xor_eq, ^=) - TVMET_DECLARE_MACRO(and_eq, &=) - TVMET_DECLARE_MACRO(or_eq, |=) - TVMET_DECLARE_MACRO(shl_eq, <<=) - TVMET_DECLARE_MACRO(shr_eq, >>=) -} - #undef TVMET_DECLARE_MACRO @@ -240,230 +230,6 @@ TVMET_DECLARE_MACRO(div, /) // per se element wise #endif // defined(TVMET_HAVE_COMPLEX) -/*++++++++++++++++++++++++++++++++++++++++++++++++++++++++ - * Vector integer and compare operators - *+++++++++++++++++++++++++++++++++++++++++++++++++++++++*/ - - -/* - * operator(Vector<T1, Sz>, Vector<T2, Sz>) - * operator(XprVector<E, Sz>, Vector<T, Sz>) - * operator(Vector<T, Sz>, XprVector<E, Sz>) - * Note: operations are per se element wise - */ -#define TVMET_DECLARE_MACRO(NAME, OP) \ -template<class T1, class T2, int Sz> \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME<T1, T2>, \ - VectorConstReference<T1, Sz>, \ - VectorConstReference<T2, Sz> \ - >, \ - Sz \ -> \ -operator OP (const Vector<T1, Sz>& lhs, \ - const Vector<T2, Sz>& rhs) TVMET_CXX_ALWAYS_INLINE; \ - \ -template<class E, class T, int Sz> \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME<typename E::value_type, T>, \ - XprVector<E, Sz>, \ - VectorConstReference<T, Sz> \ - >, \ - Sz \ -> \ -operator OP (const XprVector<E, Sz>& lhs, \ - const Vector<T, Sz>& rhs) TVMET_CXX_ALWAYS_INLINE; \ - \ -template<class E, class T, int Sz> \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME<T, typename E::value_type>, \ - VectorConstReference<T, Sz>, \ - XprVector<E, Sz> \ - >, \ - Sz \ -> \ -operator OP (const Vector<T, Sz>& lhs, \ - const XprVector<E, Sz>& rhs) TVMET_CXX_ALWAYS_INLINE; - -// integer operators only, e.g used on double you wil get an error -namespace element_wise { - TVMET_DECLARE_MACRO(mod, %) - TVMET_DECLARE_MACRO(bitxor, ^) - TVMET_DECLARE_MACRO(bitand, &) - TVMET_DECLARE_MACRO(bitor, |) - TVMET_DECLARE_MACRO(shl, <<) - TVMET_DECLARE_MACRO(shr, >>) -} - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >) -TVMET_DECLARE_MACRO(less, <) -TVMET_DECLARE_MACRO(greater_eq, >=) -TVMET_DECLARE_MACRO(less_eq, <=) -TVMET_DECLARE_MACRO(eq, ==) -TVMET_DECLARE_MACRO(not_eq, !=) -TVMET_DECLARE_MACRO(and, &&) -TVMET_DECLARE_MACRO(or, ||) - -#undef TVMET_DECLARE_MACRO - - - -#if defined(TVMET_HAVE_COMPLEX) -/* - * operator(Vector<std::complex<T>, Sz>, std::complex<T>) - * operator(std::complex<T>, Vector<std::complex<T>, Sz>) - * Note: - per se element wise - * - bit ops on complex<int> doesn't make sense, stay away - * \todo type promotion - */ -#define TVMET_DECLARE_MACRO(NAME, OP) \ -template<class T, int Sz> \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME< std::complex<T>, std::complex<T> >, \ - VectorConstReference< std::complex<T>, Sz>, \ - XprLiteral< std::complex<T> > \ - >, \ - Sz \ -> \ -operator OP (const Vector<std::complex<T>, Sz>& lhs, \ - const std::complex<T>& rhs) TVMET_CXX_ALWAYS_INLINE; \ - \ -template<class T, int Sz> \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME< std::complex<T>, std::complex<T> >, \ - XprLiteral< std::complex<T> >, \ - VectorConstReference< std::complex<T>, Sz> \ - >, \ - Sz \ -> \ -operator OP (const std::complex<T>& lhs, \ - const Vector< std::complex<T>, Sz>& rhs) TVMET_CXX_ALWAYS_INLINE; - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >) -TVMET_DECLARE_MACRO(less, <) -TVMET_DECLARE_MACRO(greater_eq, >=) -TVMET_DECLARE_MACRO(less_eq, <=) -TVMET_DECLARE_MACRO(eq, ==) -TVMET_DECLARE_MACRO(not_eq, !=) -TVMET_DECLARE_MACRO(and, &&) -TVMET_DECLARE_MACRO(or, ||) - -#undef TVMET_DECLARE_MACRO - -#endif // defined(TVMET_HAVE_COMPLEX) - - -/* - * operator(Vector<T, Sz>, POD) - * operator(POD, Vector<T, Sz>) - * Note: operations are per se element_wise - */ -#define TVMET_DECLARE_MACRO(NAME, OP, TP) \ -template<class T, int Sz> \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME< T, TP >, \ - VectorConstReference<T, Sz>, \ - XprLiteral< TP > \ - >, \ - Sz \ -> \ -operator OP (const Vector<T, Sz>& lhs, TP rhs) TVMET_CXX_ALWAYS_INLINE; \ - \ -template<class T, int Sz> \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME< TP, T>, \ - XprLiteral< TP >, \ - VectorConstReference<T, Sz> \ - >, \ - Sz \ -> \ -operator OP (TP lhs, const Vector<T, Sz>& rhs) TVMET_CXX_ALWAYS_INLINE; - -// integer operators only, e.g used on double you wil get an error -namespace element_wise { - TVMET_DECLARE_MACRO(mod, %, int) - TVMET_DECLARE_MACRO(bitxor, ^, int) - TVMET_DECLARE_MACRO(bitand, &, int) - TVMET_DECLARE_MACRO(bitor, |, int) - TVMET_DECLARE_MACRO(shl, <<, int) - TVMET_DECLARE_MACRO(shr, >>, int) -} - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, int) -TVMET_DECLARE_MACRO(less, <, int) -TVMET_DECLARE_MACRO(greater_eq, >=, int) -TVMET_DECLARE_MACRO(less_eq, <=, int) -TVMET_DECLARE_MACRO(eq, ==, int) -TVMET_DECLARE_MACRO(not_eq, !=, int) -TVMET_DECLARE_MACRO(and, &&, int) -TVMET_DECLARE_MACRO(or, ||, int) - -#if defined(TVMET_HAVE_LONG_LONG) -// integer operators only -namespace element_wise { - TVMET_DECLARE_MACRO(mod, %, long long int) - TVMET_DECLARE_MACRO(bitxor, ^, long long int) - TVMET_DECLARE_MACRO(bitand, &, long long int) - TVMET_DECLARE_MACRO(bitor, |, long long int) - TVMET_DECLARE_MACRO(shl, <<, long long int) - TVMET_DECLARE_MACRO(shr, >>, long long int) -} - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, long long int) -TVMET_DECLARE_MACRO(less, <, long long int) -TVMET_DECLARE_MACRO(greater_eq, >=, long long int) -TVMET_DECLARE_MACRO(less_eq, <=, long long int) -TVMET_DECLARE_MACRO(eq, ==, long long int) -TVMET_DECLARE_MACRO(not_eq, !=, long long int) -TVMET_DECLARE_MACRO(and, &&, long long int) -TVMET_DECLARE_MACRO(or, ||, long long int) -#endif // defined(TVMET_HAVE_LONG_LONG) - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, float) -TVMET_DECLARE_MACRO(less, <, float) -TVMET_DECLARE_MACRO(greater_eq, >=, float) -TVMET_DECLARE_MACRO(less_eq, <=, float) -TVMET_DECLARE_MACRO(eq, ==, float) -TVMET_DECLARE_MACRO(not_eq, !=, float) -TVMET_DECLARE_MACRO(and, &&, float) -TVMET_DECLARE_MACRO(or, ||, float) - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, double) -TVMET_DECLARE_MACRO(less, <, double) -TVMET_DECLARE_MACRO(greater_eq, >=, double) -TVMET_DECLARE_MACRO(less_eq, <=, double) -TVMET_DECLARE_MACRO(eq, ==, double) -TVMET_DECLARE_MACRO(not_eq, !=, double) -TVMET_DECLARE_MACRO(and, &&, double) -TVMET_DECLARE_MACRO(or, ||, double) - -#if defined(TVMET_HAVE_LONG_DOUBLE) -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, long double) -TVMET_DECLARE_MACRO(less, <, long double) -TVMET_DECLARE_MACRO(greater_eq, >=, long double) -TVMET_DECLARE_MACRO(less_eq, <=, long double) -TVMET_DECLARE_MACRO(eq, ==, long double) -TVMET_DECLARE_MACRO(not_eq, !=, long double) -TVMET_DECLARE_MACRO(and, &&, long double) -TVMET_DECLARE_MACRO(or, ||, long double) -#endif // defined(TVMET_HAVE_LONG_DOUBLE) - -#undef TVMET_DECLARE_MACRO - /*++++++++++++++++++++++++++++++++++++++++++++++++++++++++ * global unary operators @@ -485,8 +251,6 @@ XprVector< \ > \ operator OP (const Vector<T, Sz>& rhs) TVMET_CXX_ALWAYS_INLINE; -TVMET_DECLARE_MACRO(not, !) -TVMET_DECLARE_MACRO(compl, ~) TVMET_DECLARE_MACRO(neg, -) #undef TVMET_DECLARE_MACRO @@ -538,16 +302,6 @@ namespace element_wise { TVMET_IMPLEMENT_MACRO(div_eq, /=) // not defined for vectors } -// integer operators only, e.g used on double you wil get an error -namespace element_wise { - TVMET_IMPLEMENT_MACRO(mod_eq, %=) - TVMET_IMPLEMENT_MACRO(xor_eq, ^=) - TVMET_IMPLEMENT_MACRO(and_eq, &=) - TVMET_IMPLEMENT_MACRO(or_eq, |=) - TVMET_IMPLEMENT_MACRO(shl_eq, <<=) - TVMET_IMPLEMENT_MACRO(shr_eq, >>=) -} - #undef TVMET_IMPLEMENT_MACRO @@ -730,288 +484,6 @@ TVMET_IMPLEMENT_MACRO(div, /) // per se element wise /*++++++++++++++++++++++++++++++++++++++++++++++++++++++++ - * Vector integer and compare operators - *+++++++++++++++++++++++++++++++++++++++++++++++++++++++*/ - - -/* - * operator(Vector<T1, Sz>, Vector<T2, Sz>) - * operator(XprVector<E, Sz>, Vector<T, Sz>) - * operator(Vector<T, Sz>, XprVector<E, Sz>) - * Note: operations are per se element wise - */ -#define TVMET_IMPLEMENT_MACRO(NAME, OP) \ -template<class T1, class T2, int Sz> \ -inline \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME<T1, T2>, \ - VectorConstReference<T1, Sz>, \ - VectorConstReference<T2, Sz> \ - >, \ - Sz \ -> \ -operator OP (const Vector<T1, Sz>& lhs, const Vector<T2, Sz>& rhs) { \ - typedef XprBinOp < \ - Fcnl_##NAME<T1, T2>, \ - VectorConstReference<T1, Sz>, \ - VectorConstReference<T2, Sz> \ - > expr_type; \ - return XprVector<expr_type, Sz>( \ - expr_type(lhs.const_ref(), rhs.const_ref())); \ -} \ - \ -template<class E, class T, int Sz> \ -inline \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME<typename E::value_type, T>, \ - XprVector<E, Sz>, \ - VectorConstReference<T, Sz> \ - >, \ - Sz \ -> \ -operator OP (const XprVector<E, Sz>& lhs, const Vector<T, Sz>& rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME<typename E::value_type, T>, \ - XprVector<E, Sz>, \ - VectorConstReference<T, Sz> \ - > expr_type; \ - return XprVector<expr_type, Sz>( \ - expr_type(lhs, rhs.const_ref())); \ -} \ - \ -template<class E, class T, int Sz> \ -inline \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME<T, typename E::value_type>, \ - VectorConstReference<T, Sz>, \ - XprVector<E, Sz> \ - >, \ - Sz \ -> \ -operator OP (const Vector<T, Sz>& lhs, const XprVector<E, Sz>& rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME<T, typename E::value_type>, \ - VectorConstReference<T, Sz>, \ - XprVector<E, Sz> \ - > expr_type; \ - return XprVector<expr_type, Sz>( \ - expr_type(lhs.const_ref(), rhs)); \ -} - -// integer operators only, e.g used on double you wil get an error -namespace element_wise { - TVMET_IMPLEMENT_MACRO(mod, %) - TVMET_IMPLEMENT_MACRO(bitxor, ^) - TVMET_IMPLEMENT_MACRO(bitand, &) - TVMET_IMPLEMENT_MACRO(bitor, |) - TVMET_IMPLEMENT_MACRO(shl, <<) - TVMET_IMPLEMENT_MACRO(shr, >>) -} - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >) -TVMET_IMPLEMENT_MACRO(less, <) -TVMET_IMPLEMENT_MACRO(greater_eq, >=) -TVMET_IMPLEMENT_MACRO(less_eq, <=) -TVMET_IMPLEMENT_MACRO(eq, ==) -TVMET_IMPLEMENT_MACRO(not_eq, !=) -TVMET_IMPLEMENT_MACRO(and, &&) -TVMET_IMPLEMENT_MACRO(or, ||) - -#undef TVMET_IMPLEMENT_MACRO - - -#if defined(TVMET_HAVE_COMPLEX) -/* - * operator(Vector<std::complex<T>, Sz>, std::complex<T>) - * operator(std::complex<T>, Vector<std::complex<T>, Sz>) - * Note: - per se element wise - * - bit ops on complex<int> doesn't make sense, stay away - * \todo type promotion - */ -#define TVMET_IMPLEMENT_MACRO(NAME, OP) \ -template<class T, int Sz> \ -inline \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME< std::complex<T>, std::complex<T> >, \ - VectorConstReference< std::complex<T>, Sz>, \ - XprLiteral< std::complex<T> > \ - >, \ - Sz \ -> \ -operator OP (const Vector<std::complex<T>, Sz>& lhs, const std::complex<T>& rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME< std::complex<T>, std::complex<T> >, \ - VectorConstReference< std::complex<T>, Sz>, \ - XprLiteral< std::complex<T> > \ - > expr_type; \ - return XprVector<expr_type, Sz>( \ - expr_type(lhs.const_ref(), XprLiteral< std::complex<T> >(rhs))); \ -} \ - \ -template<class T, int Sz> \ -inline \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME< std::complex<T>, std::complex<T> >, \ - XprLiteral< std::complex<T> >, \ - VectorConstReference< std::complex<T>, Sz> \ - >, \ - Sz \ -> \ -operator OP (const std::complex<T>& lhs, const Vector< std::complex<T>, Sz>& rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME< std::complex<T>, std::complex<T> >, \ - XprLiteral< std::complex<T> >, \ - VectorConstReference< std::complex<T>, Sz> \ - > expr_type; \ - return XprVector<expr_type, Sz>( \ - expr_type(XprLiteral< std::complex<T> >(lhs), rhs.const_ref())); \ -} - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >) -TVMET_IMPLEMENT_MACRO(less, <) -TVMET_IMPLEMENT_MACRO(greater_eq, >=) -TVMET_IMPLEMENT_MACRO(less_eq, <=) -TVMET_IMPLEMENT_MACRO(eq, ==) -TVMET_IMPLEMENT_MACRO(not_eq, !=) -TVMET_IMPLEMENT_MACRO(and, &&) -TVMET_IMPLEMENT_MACRO(or, ||) - -#undef TVMET_IMPLEMENT_MACRO - -#endif // defined(TVMET_HAVE_COMPLEX) - - -/* - * operator(Vector<T, Sz>, POD) - * operator(POD, Vector<T, Sz>) - * Note: operations are per se element_wise - */ -#define TVMET_IMPLEMENT_MACRO(NAME, OP, TP) \ -template<class T, int Sz> \ -inline \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME< T, TP >, \ - VectorConstReference<T, Sz>, \ - XprLiteral< TP > \ - >, \ - Sz \ -> \ -operator OP (const Vector<T, Sz>& lhs, TP rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME<T, TP >, \ - VectorConstReference<T, Sz>, \ - XprLiteral< TP > \ - > expr_type; \ - return XprVector<expr_type, Sz>( \ - expr_type(lhs.const_ref(), XprLiteral< TP >(rhs))); \ -} \ - \ -template<class T, int Sz> \ -inline \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME< TP, T>, \ - XprLiteral< TP >, \ - VectorConstReference<T, Sz> \ - >, \ - Sz \ -> \ -operator OP (TP lhs, const Vector<T, Sz>& rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME< TP, T>, \ - XprLiteral< TP >, \ - VectorConstReference<T, Sz> \ - > expr_type; \ - return XprVector<expr_type, Sz>( \ - expr_type(XprLiteral< TP >(lhs), rhs.const_ref())); \ -} - -// integer operators only, e.g used on double you wil get an error -namespace element_wise { - TVMET_IMPLEMENT_MACRO(mod, %, int) - TVMET_IMPLEMENT_MACRO(bitxor, ^, int) - TVMET_IMPLEMENT_MACRO(bitand, &, int) - TVMET_IMPLEMENT_MACRO(bitor, |, int) - TVMET_IMPLEMENT_MACRO(shl, <<, int) - TVMET_IMPLEMENT_MACRO(shr, >>, int) -} - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, int) -TVMET_IMPLEMENT_MACRO(less, <, int) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, int) -TVMET_IMPLEMENT_MACRO(less_eq, <=, int) -TVMET_IMPLEMENT_MACRO(eq, ==, int) -TVMET_IMPLEMENT_MACRO(not_eq, !=, int) -TVMET_IMPLEMENT_MACRO(and, &&, int) -TVMET_IMPLEMENT_MACRO(or, ||, int) - -#if defined(TVMET_HAVE_LONG_LONG) -// integer operators only -namespace element_wise { - TVMET_IMPLEMENT_MACRO(mod, %, long long int) - TVMET_IMPLEMENT_MACRO(bitxor, ^, long long int) - TVMET_IMPLEMENT_MACRO(bitand, &, long long int) - TVMET_IMPLEMENT_MACRO(bitor, |, long long int) - TVMET_IMPLEMENT_MACRO(shl, <<, long long int) - TVMET_IMPLEMENT_MACRO(shr, >>, long long int) -} - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, long long int) -TVMET_IMPLEMENT_MACRO(less, <, long long int) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, long long int) -TVMET_IMPLEMENT_MACRO(less_eq, <=, long long int) -TVMET_IMPLEMENT_MACRO(eq, ==, long long int) -TVMET_IMPLEMENT_MACRO(not_eq, !=, long long int) -TVMET_IMPLEMENT_MACRO(and, &&, long long int) -TVMET_IMPLEMENT_MACRO(or, ||, long long int) -#endif // defined(TVMET_HAVE_LONG_LONG) - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, float) -TVMET_IMPLEMENT_MACRO(less, <, float) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, float) -TVMET_IMPLEMENT_MACRO(less_eq, <=, float) -TVMET_IMPLEMENT_MACRO(eq, ==, float) -TVMET_IMPLEMENT_MACRO(not_eq, !=, float) -TVMET_IMPLEMENT_MACRO(and, &&, float) -TVMET_IMPLEMENT_MACRO(or, ||, float) - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, double) -TVMET_IMPLEMENT_MACRO(less, <, double) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, double) -TVMET_IMPLEMENT_MACRO(less_eq, <=, double) -TVMET_IMPLEMENT_MACRO(eq, ==, double) -TVMET_IMPLEMENT_MACRO(not_eq, !=, double) -TVMET_IMPLEMENT_MACRO(and, &&, double) -TVMET_IMPLEMENT_MACRO(or, ||, double) - -#if defined(TVMET_HAVE_LONG_DOUBLE) -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, long double) -TVMET_IMPLEMENT_MACRO(less, <, long double) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, long double) -TVMET_IMPLEMENT_MACRO(less_eq, <=, long double) -TVMET_IMPLEMENT_MACRO(eq, ==, long double) -TVMET_IMPLEMENT_MACRO(not_eq, !=, long double) -TVMET_IMPLEMENT_MACRO(and, &&, long double) -TVMET_IMPLEMENT_MACRO(or, ||, long double) -#endif // defined(TVMET_HAVE_LONG_DOUBLE) - -#undef TVMET_IMPLEMENT_MACRO - - -/*++++++++++++++++++++++++++++++++++++++++++++++++++++++++ * global unary operators *+++++++++++++++++++++++++++++++++++++++++++++++++++++++*/ @@ -1038,8 +510,6 @@ operator OP (const Vector<T, Sz>& rhs) { \ return XprVector<expr_type, Sz>(expr_type(rhs.const_ref())); \ } -TVMET_IMPLEMENT_MACRO(not, !) -TVMET_IMPLEMENT_MACRO(compl, ~) TVMET_IMPLEMENT_MACRO(neg, -) #undef TVMET_IMPLEMENT_MACRO diff --git a/tvmet-1.7.1/include/tvmet/VectorUnaryFunctions.h b/tvmet-1.7.1/include/tvmet/VectorUnaryFunctions.h index 7c01cbf21..6cb7bdddf 100644 --- a/tvmet-1.7.1/include/tvmet/VectorUnaryFunctions.h +++ b/tvmet-1.7.1/include/tvmet/VectorUnaryFunctions.h @@ -32,65 +32,6 @@ namespace tvmet { *********************************************************/ /* - * unary_function(Vector<T, Sz>) - */ -#define TVMET_DECLARE_MACRO(NAME) \ -template<class T, int Sz> \ -XprVector< \ - XprUnOp< \ - Fcnl_##NAME<T>, \ - VectorConstReference<T, Sz> \ - >, \ - Sz \ -> \ -NAME(const Vector<T, Sz>& rhs) TVMET_CXX_ALWAYS_INLINE; - -TVMET_DECLARE_MACRO(abs) -TVMET_DECLARE_MACRO(cbrt) -TVMET_DECLARE_MACRO(ceil) -TVMET_DECLARE_MACRO(floor) -TVMET_DECLARE_MACRO(rint) -TVMET_DECLARE_MACRO(sin) -TVMET_DECLARE_MACRO(cos) -TVMET_DECLARE_MACRO(tan) -TVMET_DECLARE_MACRO(sinh) -TVMET_DECLARE_MACRO(cosh) -TVMET_DECLARE_MACRO(tanh) -TVMET_DECLARE_MACRO(asin) -TVMET_DECLARE_MACRO(acos) -TVMET_DECLARE_MACRO(atan) -TVMET_DECLARE_MACRO(exp) -TVMET_DECLARE_MACRO(log) -TVMET_DECLARE_MACRO(log10) -TVMET_DECLARE_MACRO(sqrt) - -#if defined(TVMET_HAVE_IEEE_MATH) -TVMET_DECLARE_MACRO(asinh) -TVMET_DECLARE_MACRO(acosh) -TVMET_DECLARE_MACRO(atanh) -TVMET_DECLARE_MACRO(expm1) -TVMET_DECLARE_MACRO(log1p) -TVMET_DECLARE_MACRO(erf) -TVMET_DECLARE_MACRO(erfc) -TVMET_DECLARE_MACRO(j0) -TVMET_DECLARE_MACRO(j1) -TVMET_DECLARE_MACRO(y0) -TVMET_DECLARE_MACRO(y1) -TVMET_DECLARE_MACRO(lgamma) -/** \todo isnan etc. - default return is only an int! */ -#if !defined(TVMET_NO_IEEE_MATH_ISNAN) -TVMET_DECLARE_MACRO(isnan) -#endif -#if !defined(TVMET_NO_IEEE_MATH_ISINF) -TVMET_DECLARE_MACRO(isinf) -#endif -TVMET_DECLARE_MACRO(finite) -#endif // defined(TVMET_HAVE_IEEE_MATH) - -#undef TVMET_DECLARE_MACRO - - -/* * unary_function(Vector<std::complex<T>, Sz>) */ #if defined(TVMET_HAVE_COMPLEX) @@ -107,8 +48,6 @@ NAME(const Vector<std::complex<T>, Sz>& rhs) TVMET_CXX_ALWAYS_INLINE; TVMET_DECLARE_MACRO(real) TVMET_DECLARE_MACRO(imag) -TVMET_DECLARE_MACRO(arg) -TVMET_DECLARE_MACRO(norm) TVMET_DECLARE_MACRO(conj) #undef TVMET_DECLARE_MACRO @@ -122,72 +61,6 @@ TVMET_DECLARE_MACRO(conj) /* - * unary_function(Vector<T, Sz>) - */ -#define TVMET_IMPLEMENT_MACRO(NAME) \ -template<class T, int Sz> \ -inline \ -XprVector< \ - XprUnOp< \ - Fcnl_##NAME<T>, \ - VectorConstReference<T, Sz> \ - >, \ - Sz \ -> \ -NAME(const Vector<T, Sz>& rhs) { \ - typedef XprUnOp< \ - Fcnl_##NAME<T>, \ - VectorConstReference<T, Sz> \ - > expr_type; \ - return XprVector<expr_type, Sz>(expr_type(rhs.const_ref())); \ -} - -TVMET_IMPLEMENT_MACRO(abs) -TVMET_IMPLEMENT_MACRO(cbrt) -TVMET_IMPLEMENT_MACRO(ceil) -TVMET_IMPLEMENT_MACRO(floor) -TVMET_IMPLEMENT_MACRO(rint) -TVMET_IMPLEMENT_MACRO(sin) -TVMET_IMPLEMENT_MACRO(cos) -TVMET_IMPLEMENT_MACRO(tan) -TVMET_IMPLEMENT_MACRO(sinh) -TVMET_IMPLEMENT_MACRO(cosh) -TVMET_IMPLEMENT_MACRO(tanh) -TVMET_IMPLEMENT_MACRO(asin) -TVMET_IMPLEMENT_MACRO(acos) -TVMET_IMPLEMENT_MACRO(atan) -TVMET_IMPLEMENT_MACRO(exp) -TVMET_IMPLEMENT_MACRO(log) -TVMET_IMPLEMENT_MACRO(log10) -TVMET_IMPLEMENT_MACRO(sqrt) - -#if defined(TVMET_HAVE_IEEE_MATH) -TVMET_IMPLEMENT_MACRO(asinh) -TVMET_IMPLEMENT_MACRO(acosh) -TVMET_IMPLEMENT_MACRO(atanh) -TVMET_IMPLEMENT_MACRO(expm1) -TVMET_IMPLEMENT_MACRO(log1p) -TVMET_IMPLEMENT_MACRO(erf) -TVMET_IMPLEMENT_MACRO(erfc) -TVMET_IMPLEMENT_MACRO(j0) -TVMET_IMPLEMENT_MACRO(j1) -TVMET_IMPLEMENT_MACRO(y0) -TVMET_IMPLEMENT_MACRO(y1) -TVMET_IMPLEMENT_MACRO(lgamma) -/** \todo isnan etc. - default return is only an int! */ -#if !defined(TVMET_NO_IEEE_MATH_ISNAN) -TVMET_IMPLEMENT_MACRO(isnan) -#endif -#if !defined(TVMET_NO_IEEE_MATH_ISINF) -TVMET_IMPLEMENT_MACRO(isinf) -#endif -TVMET_IMPLEMENT_MACRO(finite) -#endif // defined(TVMET_HAVE_IEEE_MATH) - -#undef TVMET_IMPLEMENT_MACRO - - -/* * unary_function(Vector<std::complex<T>, Sz>) */ #if defined(TVMET_HAVE_COMPLEX) @@ -211,8 +84,6 @@ NAME(const Vector<std::complex<T>, Sz>& rhs) { \ TVMET_IMPLEMENT_MACRO(real) TVMET_IMPLEMENT_MACRO(imag) -TVMET_IMPLEMENT_MACRO(arg) -TVMET_IMPLEMENT_MACRO(norm) TVMET_IMPLEMENT_MACRO(conj) #undef TVMET_IMPLEMENT_MACRO diff --git a/tvmet-1.7.1/include/tvmet/tvmet.h b/tvmet-1.7.1/include/tvmet/tvmet.h index abf7a7a0e..17b845eb4 100644 --- a/tvmet-1.7.1/include/tvmet/tvmet.h +++ b/tvmet-1.7.1/include/tvmet/tvmet.h @@ -27,29 +27,6 @@ #include <tvmet/config.h> -/*********************************************************************** - * Compiler specifics - ***********************************************************************/ -#if defined(__GNUC__) -# include <tvmet/config/config-gcc.h> -#endif - -#if defined(__ICC) -# include <tvmet/config/config-icc.h> -#endif - -#if defined(__KCC) -# include <tvmet/config/config-kcc.h> -#endif - -#if defined(__PGI) -# include <tvmet/config/config-pgi.h> -#endif - -// vc7.1: 1310 and vc7.0 1300 -#if defined(_MSC_VER) && (_MSC_VER >= 1310) -# include <tvmet/config/config-vc71.h> -#endif /* * other compiler specific stuff diff --git a/tvmet-1.7.1/include/tvmet/xpr/MMProduct.h b/tvmet-1.7.1/include/tvmet/xpr/MMProduct.h index 3b0df5f93..7fe4f746a 100644 --- a/tvmet-1.7.1/include/tvmet/xpr/MMProduct.h +++ b/tvmet-1.7.1/include/tvmet/xpr/MMProduct.h @@ -24,6 +24,8 @@ #ifndef TVMET_XPR_MMPRODUCT_H #define TVMET_XPR_MMPRODUCT_H +#include <cassert> + #include <tvmet/meta/Gemm.h> #include <tvmet/loop/Gemm.h> @@ -98,7 +100,7 @@ private: public: /** index operator for arrays/matrices */ value_type operator()(int i, int j) const { - TVMET_RT_CONDITION((i < Rows1) && (j < Cols2), "XprMMProduct Bounce Violation") + assert((i < Rows1) && (j < Cols2)); return do_gemm(dispatch<use_meta>(), m_lhs, m_rhs, i, j); } diff --git a/tvmet-1.7.1/include/tvmet/xpr/MMProductTransposed.h b/tvmet-1.7.1/include/tvmet/xpr/MMProductTransposed.h index df5d04971..d8fb735b1 100644 --- a/tvmet-1.7.1/include/tvmet/xpr/MMProductTransposed.h +++ b/tvmet-1.7.1/include/tvmet/xpr/MMProductTransposed.h @@ -24,6 +24,8 @@ #ifndef TVMET_XPR_MMPRODUCT_TRANSPOSED_H #define TVMET_XPR_MMPRODUCT_TRANSPOSED_H +#include <cassert> + #include <tvmet/meta/Gemm.h> #include <tvmet/loop/Gemm.h> @@ -98,7 +100,7 @@ private: public: /** index operator for arrays/matrices */ value_type operator()(int i, int j) const { - TVMET_RT_CONDITION((i < Cols2) && (j < Rows1), "XprMMProductTransposed Bounce Violation") + assert((i < Cols2) && (j < Rows1)); return do_gemm(dispatch<use_meta>(), m_lhs, m_rhs, j, i); } diff --git a/tvmet-1.7.1/include/tvmet/xpr/MMtProduct.h b/tvmet-1.7.1/include/tvmet/xpr/MMtProduct.h index 528eff78c..1cc7bd9cf 100644 --- a/tvmet-1.7.1/include/tvmet/xpr/MMtProduct.h +++ b/tvmet-1.7.1/include/tvmet/xpr/MMtProduct.h @@ -24,6 +24,8 @@ #ifndef TVMET_XPR_MMTPRODUCT_H #define TVMET_XPR_MMTPRODUCT_H +#include <cassert> + #include <tvmet/meta/Gemmt.h> #include <tvmet/loop/Gemmt.h> @@ -100,7 +102,7 @@ private: public: /** index operator for arrays/matrices */ value_type operator()(int i, int j) const { - TVMET_RT_CONDITION((i < Rows1) && (j < Rows2), "XprMMtProduct Bounce Violation") + assert((i < Rows1) && (j < Rows2)); return do_gemmt(dispatch<use_meta>(), m_lhs, m_rhs, i, j); } diff --git a/tvmet-1.7.1/include/tvmet/xpr/MVProduct.h b/tvmet-1.7.1/include/tvmet/xpr/MVProduct.h index 878e65a89..751431656 100644 --- a/tvmet-1.7.1/include/tvmet/xpr/MVProduct.h +++ b/tvmet-1.7.1/include/tvmet/xpr/MVProduct.h @@ -24,6 +24,8 @@ #ifndef TVMET_XPR_MVPRODUCT_H #define TVMET_XPR_MVPRODUCT_H +#include <cassert> + #include <tvmet/meta/Gemv.h> #include <tvmet/loop/Gemv.h> @@ -96,7 +98,7 @@ public: /** index operator, returns the expression by index. This is the vector style since a matrix*vector gives a vector. */ value_type operator()(int j) const { - TVMET_RT_CONDITION(j < Rows , "XprMVProduct Bounce Violation") + assert(j < Rows); return do_gemv(dispatch<use_meta>(), m_lhs, m_rhs, j); } diff --git a/tvmet-1.7.1/include/tvmet/xpr/Matrix.h b/tvmet-1.7.1/include/tvmet/xpr/Matrix.h index c31189c3d..08b7bad85 100644 --- a/tvmet-1.7.1/include/tvmet/xpr/Matrix.h +++ b/tvmet-1.7.1/include/tvmet/xpr/Matrix.h @@ -24,6 +24,8 @@ #ifndef TVMET_XPR_MATRIX_H #define TVMET_XPR_MATRIX_H +#include <cassert> + #include <tvmet/meta/Matrix.h> #include <tvmet/loop/Matrix.h> @@ -87,7 +89,7 @@ public: /** access by index. */ value_type operator()(int i, int j) const { - TVMET_RT_CONDITION((i < Rows) && (j < Cols), "XprMatrix Bounce Violation") + assert((i < Rows) && (j < Cols)); return m_expr(i, j); } @@ -153,7 +155,6 @@ private: #include <tvmet/xpr/MatrixFunctions.h> #include <tvmet/xpr/MatrixBinaryFunctions.h> -#include <tvmet/xpr/MatrixUnaryFunctions.h> #include <tvmet/xpr/MatrixOperators.h> #include <tvmet/xpr/Eval.h> diff --git a/tvmet-1.7.1/include/tvmet/xpr/MatrixCol.h b/tvmet-1.7.1/include/tvmet/xpr/MatrixCol.h index 01153a2de..47e2554b8 100644 --- a/tvmet-1.7.1/include/tvmet/xpr/MatrixCol.h +++ b/tvmet-1.7.1/include/tvmet/xpr/MatrixCol.h @@ -21,6 +21,8 @@ * $Id: MatrixCol.h,v 1.15 2004/09/16 09:14:18 opetzold Exp $ */ +#include <cassert> + #ifndef TVMET_XPR_MATRIX_COL_H #define TVMET_XPR_MATRIX_COL_H @@ -53,7 +55,7 @@ public: explicit XprMatrixCol(const E& e, int no) : m_expr(e), m_col(no) { - TVMET_RT_CONDITION(no < Cols, "XprMatrixCol Bounce Violation") + assert(no < Cols); } /** Copy Constructor. Not explicit! */ @@ -64,7 +66,7 @@ public: #endif value_type operator()(int i) const { - TVMET_RT_CONDITION(i < Rows, "XprMatrixCol Bounce Violation") + assert(i < Rows); return m_expr(i, m_col); } diff --git a/tvmet-1.7.1/include/tvmet/xpr/MatrixDiag.h b/tvmet-1.7.1/include/tvmet/xpr/MatrixDiag.h index 106478613..4a8a080ac 100644 --- a/tvmet-1.7.1/include/tvmet/xpr/MatrixDiag.h +++ b/tvmet-1.7.1/include/tvmet/xpr/MatrixDiag.h @@ -21,6 +21,8 @@ * $Id: MatrixDiag.h,v 1.13 2004/09/16 09:14:18 opetzold Exp $ */ +#include <cassert> + #ifndef TVMET_XPR_MATRIX_DIAG_H #define TVMET_XPR_MATRIX_DIAG_H @@ -63,7 +65,7 @@ public: /** index operator for arrays/matrizes */ value_type operator()(int i) const { - TVMET_RT_CONDITION(i < Sz, "XprMatrixDiag Bounce Violation") + assert(i < Sz); return m_expr(i, i); } diff --git a/tvmet-1.7.1/include/tvmet/xpr/MatrixOperators.h b/tvmet-1.7.1/include/tvmet/xpr/MatrixOperators.h index 5576860e9..8dbe2670d 100644 --- a/tvmet-1.7.1/include/tvmet/xpr/MatrixOperators.h +++ b/tvmet-1.7.1/include/tvmet/xpr/MatrixOperators.h @@ -220,206 +220,6 @@ operator*(const XprMatrix<E1, Rows, Cols>& lhs, const XprVector<E2, Cols>& rhs) TVMET_CXX_ALWAYS_INLINE; -/*++++++++++++++++++++++++++++++++++++++++++++++++++++++++ - * Matrix integer and compare operators - *+++++++++++++++++++++++++++++++++++++++++++++++++++++++*/ - - -/* - * operator(XprMatrix<>, XprMatrix<>) - * Note: operations are per se element wise - */ -#define TVMET_DECLARE_MACRO(NAME, OP) \ -template<class E1, int Rows, int Cols, \ - class E2> \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME<typename E1::value_type, typename E2::value_type>, \ - XprMatrix<E1, Rows, Cols>, \ - XprMatrix<E2, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -operator OP (const XprMatrix<E1, Rows, Cols>& lhs, \ - const XprMatrix<E2, Rows, Cols>& rhs) TVMET_CXX_ALWAYS_INLINE; - -// integer operators only, e.g used on double you will get an error -namespace element_wise { - TVMET_DECLARE_MACRO(mod, %) - TVMET_DECLARE_MACRO(bitxor, ^) - TVMET_DECLARE_MACRO(bitand, &) - TVMET_DECLARE_MACRO(bitor, |) - TVMET_DECLARE_MACRO(shl, <<) - TVMET_DECLARE_MACRO(shr, >>) -} - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >) -TVMET_DECLARE_MACRO(less, <) -TVMET_DECLARE_MACRO(greater_eq, >=) -TVMET_DECLARE_MACRO(less_eq, <=) -TVMET_DECLARE_MACRO(eq, ==) -TVMET_DECLARE_MACRO(not_eq, !=) -TVMET_DECLARE_MACRO(and, &&) -TVMET_DECLARE_MACRO(or, ||) - -#undef TVMET_DECLARE_MACRO - - -#if defined(TVMET_HAVE_COMPLEX) -/* - * operator(XprMatrix<E, Rows, Cols>, std::complex<>) - * operator(std::complex<>, XprMatrix<E, Rows, Cols>) - * Note: - per se element wise - * - bit ops on complex<int> doesn't make sense, stay away - * \todo type promotion - */ -#define TVMET_DECLARE_MACRO(NAME, OP) \ -template<class E, int Rows, int Cols, class T> \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME<typename E::value_type, std::complex<T> >, \ - XprMatrix<E, Rows, Cols>, \ - XprLiteral< std::complex<T> > \ - >, \ - Rows, Cols \ -> \ -operator OP (const XprMatrix<E, Rows, Cols>& lhs, \ - const std::complex<T>& rhs) TVMET_CXX_ALWAYS_INLINE; \ - \ -template<class E, int Rows, int Cols, class T> \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME<std::complex<T>, typename E::value_type>, \ - XprLiteral< std::complex<T> >, \ - XprMatrix<E, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -operator OP (const std::complex<T>& lhs, \ - const XprMatrix<E, Rows, Cols>& rhs) TVMET_CXX_ALWAYS_INLINE; - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >) -TVMET_DECLARE_MACRO(less, <) -TVMET_DECLARE_MACRO(greater_eq, >=) -TVMET_DECLARE_MACRO(less_eq, <=) -TVMET_DECLARE_MACRO(eq, ==) -TVMET_DECLARE_MACRO(not_eq, !=) -TVMET_DECLARE_MACRO(and, &&) -TVMET_DECLARE_MACRO(or, ||) - -#undef TVMET_DECLARE_MACRO - -#endif // defined(TVMET_HAVE_COMPLEX) - - -/* - * operator(XprMatrix<E, Rows, Cols>, POD) - * operator(POD, XprMatrix<E, Rows, Cols>) - * Note: operations are per se element wise - */ -#define TVMET_DECLARE_MACRO(NAME, OP, TP) \ -template<class E, int Rows, int Cols> \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME<typename E::value_type, TP >, \ - XprMatrix<E, Rows, Cols>, \ - XprLiteral< TP > \ - >, \ - Rows, Cols \ -> \ -operator OP (const XprMatrix<E, Rows, Cols>& lhs, \ - TP rhs) TVMET_CXX_ALWAYS_INLINE; \ - \ -template<class E, int Rows, int Cols> \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME<TP, typename E::value_type>, \ - XprLiteral< TP >, \ - XprMatrix<E, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -operator OP (TP lhs, \ - const XprMatrix<E, Rows, Cols>& rhs) TVMET_CXX_ALWAYS_INLINE; - -// integer operators only, e.g used on double you will get an error -namespace element_wise { - TVMET_DECLARE_MACRO(mod, %, int) - TVMET_DECLARE_MACRO(bitxor, ^, int) - TVMET_DECLARE_MACRO(bitand, &, int) - TVMET_DECLARE_MACRO(bitor, |, int) - TVMET_DECLARE_MACRO(shl, <<, int) - TVMET_DECLARE_MACRO(shr, >>, int) -} - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, int) -TVMET_DECLARE_MACRO(less, <, int) -TVMET_DECLARE_MACRO(greater_eq, >=, int) -TVMET_DECLARE_MACRO(less_eq, <=, int) -TVMET_DECLARE_MACRO(eq, ==, int) -TVMET_DECLARE_MACRO(not_eq, !=, int) -TVMET_DECLARE_MACRO(and, &&, int) -TVMET_DECLARE_MACRO(or, ||, int) - -#if defined(TVMET_HAVE_LONG_LONG) -// integer operators only -namespace element_wise { - TVMET_DECLARE_MACRO(mod, %, long long int) - TVMET_DECLARE_MACRO(bitxor, ^, long long int) - TVMET_DECLARE_MACRO(bitand, &, long long int) - TVMET_DECLARE_MACRO(bitor, |, long long int) - TVMET_DECLARE_MACRO(shl, <<, long long int) - TVMET_DECLARE_MACRO(shr, >>, long long int) -} - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, long long int) -TVMET_DECLARE_MACRO(less, <, long long int) -TVMET_DECLARE_MACRO(greater_eq, >=, long long int) -TVMET_DECLARE_MACRO(less_eq, <=, long long int) -TVMET_DECLARE_MACRO(eq, ==, long long int) -TVMET_DECLARE_MACRO(not_eq, !=, long long int) -TVMET_DECLARE_MACRO(and, &&, long long int) -TVMET_DECLARE_MACRO(or, ||, long long int) -#endif // defined(TVMET_HAVE_LONG_LONG) - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, float) -TVMET_DECLARE_MACRO(less, <, float) -TVMET_DECLARE_MACRO(greater_eq, >=, float) -TVMET_DECLARE_MACRO(less_eq, <=, float) -TVMET_DECLARE_MACRO(eq, ==, float) -TVMET_DECLARE_MACRO(not_eq, !=, float) -TVMET_DECLARE_MACRO(and, &&, float) -TVMET_DECLARE_MACRO(or, ||, float) - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, double) -TVMET_DECLARE_MACRO(less, <, double) -TVMET_DECLARE_MACRO(greater_eq, >=, double) -TVMET_DECLARE_MACRO(less_eq, <=, double) -TVMET_DECLARE_MACRO(eq, ==, double) -TVMET_DECLARE_MACRO(not_eq, !=, double) -TVMET_DECLARE_MACRO(and, &&, double) -TVMET_DECLARE_MACRO(or, ||, double) - -#if defined(TVMET_HAVE_LONG_DOUBLE) -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, long double) -TVMET_DECLARE_MACRO(less, <, long double) -TVMET_DECLARE_MACRO(greater_eq, >=, long double) -TVMET_DECLARE_MACRO(less_eq, <=, long double) -TVMET_DECLARE_MACRO(eq, ==, long double) -TVMET_DECLARE_MACRO(not_eq, !=, long double) -TVMET_DECLARE_MACRO(and, &&, long double) -TVMET_DECLARE_MACRO(or, ||, long double) -#endif // defined(TVMET_HAVE_LONG_DOUBLE) - -#undef TVMET_DECLARE_MACRO - /*++++++++++++++++++++++++++++++++++++++++++++++++++++++++ * global unary operators @@ -441,8 +241,6 @@ XprMatrix< \ > \ operator OP (const XprMatrix<E, Rows, Cols>& m) TVMET_CXX_ALWAYS_INLINE; -TVMET_DECLARE_MACRO(not, !) -TVMET_DECLARE_MACRO(compl, ~) TVMET_DECLARE_MACRO(neg, -) #undef TVMET_DECLARE_MACRO @@ -659,249 +457,6 @@ operator*(const XprMatrix<E1, Rows, Cols>& lhs, const XprVector<E2, Cols>& rhs) } -/*++++++++++++++++++++++++++++++++++++++++++++++++++++++++ - * Matrix integer and compare operators - *+++++++++++++++++++++++++++++++++++++++++++++++++++++++*/ - - -/* - * operator(XprMatrix<>, XprMatrix<>) - * Note: operations are per se element wise - */ -#define TVMET_IMPLEMENT_MACRO(NAME, OP) \ -template<class E1, int Rows, int Cols, \ - class E2> \ -inline \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME<typename E1::value_type, typename E2::value_type>, \ - XprMatrix<E1, Rows, Cols>, \ - XprMatrix<E2, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -operator OP (const XprMatrix<E1, Rows, Cols>& lhs, \ - const XprMatrix<E2, Rows, Cols>& rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME<typename E1::value_type, typename E2::value_type>, \ - XprMatrix<E1, Rows, Cols>, \ - XprMatrix<E2, Rows, Cols> \ - > expr_type; \ - return XprMatrix<expr_type, Rows, Cols>(expr_type(lhs, rhs)); \ -} - -// integer operators only, e.g used on double you will get an error -namespace element_wise { - TVMET_IMPLEMENT_MACRO(mod, %) - TVMET_IMPLEMENT_MACRO(bitxor, ^) - TVMET_IMPLEMENT_MACRO(bitand, &) - TVMET_IMPLEMENT_MACRO(bitor, |) - TVMET_IMPLEMENT_MACRO(shl, <<) - TVMET_IMPLEMENT_MACRO(shr, >>) -} - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >) -TVMET_IMPLEMENT_MACRO(less, <) -TVMET_IMPLEMENT_MACRO(greater_eq, >=) -TVMET_IMPLEMENT_MACRO(less_eq, <=) -TVMET_IMPLEMENT_MACRO(eq, ==) -TVMET_IMPLEMENT_MACRO(not_eq, !=) -TVMET_IMPLEMENT_MACRO(and, &&) -TVMET_IMPLEMENT_MACRO(or, ||) - -#undef TVMET_IMPLEMENT_MACRO - - -#if defined(TVMET_HAVE_COMPLEX) -/* - * operator(XprMatrix<E, Rows, Cols>, std::complex<>) - * operator(std::complex<>, XprMatrix<E, Rows, Cols>) - * Note: - per se element wise - * - bit ops on complex<int> doesn't make sense, stay away - * \todo type promotion - */ -#define TVMET_IMPLEMENT_MACRO(NAME, OP) \ -template<class E, int Rows, int Cols, class T> \ -inline \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME<typename E::value_type, std::complex<T> >, \ - XprMatrix<E, Rows, Cols>, \ - XprLiteral< std::complex<T> > \ - >, \ - Rows, Cols \ -> \ -operator OP (const XprMatrix<E, Rows, Cols>& lhs, \ - const std::complex<T>& rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME<typename E::value_type, std::complex<T> >, \ - XprMatrix<E, Rows, Cols>, \ - XprLiteral< std::complex<T> > \ - > expr_type; \ - return XprMatrix<expr_type, Rows, Cols>( \ - expr_type(lhs, XprLiteral< std::complex<T> >(rhs))); \ -} \ - \ -template<class E, int Rows, int Cols, class T> \ -inline \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME<std::complex<T>, typename E::value_type>, \ - XprLiteral< std::complex<T> >, \ - XprMatrix<E, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -operator OP (const std::complex<T>& lhs, \ - const XprMatrix<E, Rows, Cols>& rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME< std::complex<T>, typename E::value_type>, \ - XprLiteral< std::complex<T> >, \ - XprMatrix<E, Rows, Cols> \ - > expr_type; \ - return XprMatrix<expr_type, Rows, Cols>( \ - expr_type(XprLiteral< std::complex<T> >(lhs), rhs)); \ -} - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >) -TVMET_IMPLEMENT_MACRO(less, <) -TVMET_IMPLEMENT_MACRO(greater_eq, >=) -TVMET_IMPLEMENT_MACRO(less_eq, <=) -TVMET_IMPLEMENT_MACRO(eq, ==) -TVMET_IMPLEMENT_MACRO(not_eq, !=) -TVMET_IMPLEMENT_MACRO(and, &&) -TVMET_IMPLEMENT_MACRO(or, ||) - -#undef TVMET_IMPLEMENT_MACRO - -#endif // defined(TVMET_HAVE_COMPLEX) - - -/* - * operator(XprMatrix<E, Rows, Cols>, POD) - * operator(POD, XprMatrix<E, Rows, Cols>) - * Note: operations are per se element wise - */ -#define TVMET_IMPLEMENT_MACRO(NAME, OP, TP) \ -template<class E, int Rows, int Cols> \ -inline \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME<typename E::value_type, TP >, \ - XprMatrix<E, Rows, Cols>, \ - XprLiteral< TP > \ - >, \ - Rows, Cols \ -> \ -operator OP (const XprMatrix<E, Rows, Cols>& lhs, TP rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME<typename E::value_type, TP >, \ - XprMatrix<E, Rows, Cols>, \ - XprLiteral< TP > \ - > expr_type; \ - return XprMatrix<expr_type, Rows, Cols>( \ - expr_type(lhs, XprLiteral< TP >(rhs))); \ -} \ - \ -template<class E, int Rows, int Cols> \ -inline \ -XprMatrix< \ - XprBinOp< \ - Fcnl_##NAME<TP, typename E::value_type>, \ - XprLiteral< TP >, \ - XprMatrix<E, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -operator OP (TP lhs, const XprMatrix<E, Rows, Cols>& rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME< TP, typename E::value_type>, \ - XprLiteral< TP >, \ - XprMatrix<E, Rows, Cols> \ - > expr_type; \ - return XprMatrix<expr_type, Rows, Cols>( \ - expr_type(XprLiteral< TP >(lhs), rhs)); \ -} - - -// integer operators only, e.g used on double you will get an error -namespace element_wise { - TVMET_IMPLEMENT_MACRO(mod, %, int) - TVMET_IMPLEMENT_MACRO(bitxor, ^, int) - TVMET_IMPLEMENT_MACRO(bitand, &, int) - TVMET_IMPLEMENT_MACRO(bitor, |, int) - TVMET_IMPLEMENT_MACRO(shl, <<, int) - TVMET_IMPLEMENT_MACRO(shr, >>, int) -} - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, int) -TVMET_IMPLEMENT_MACRO(less, <, int) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, int) -TVMET_IMPLEMENT_MACRO(less_eq, <=, int) -TVMET_IMPLEMENT_MACRO(eq, ==, int) -TVMET_IMPLEMENT_MACRO(not_eq, !=, int) -TVMET_IMPLEMENT_MACRO(and, &&, int) -TVMET_IMPLEMENT_MACRO(or, ||, int) - -#if defined(TVMET_HAVE_LONG_LONG) -// integer operators only -namespace element_wise { - TVMET_IMPLEMENT_MACRO(mod, %, long long int) - TVMET_IMPLEMENT_MACRO(bitxor, ^, long long int) - TVMET_IMPLEMENT_MACRO(bitand, &, long long int) - TVMET_IMPLEMENT_MACRO(bitor, |, long long int) - TVMET_IMPLEMENT_MACRO(shl, <<, long long int) - TVMET_IMPLEMENT_MACRO(shr, >>, long long int) -} - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, long long int) -TVMET_IMPLEMENT_MACRO(less, <, long long int) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, long long int) -TVMET_IMPLEMENT_MACRO(less_eq, <=, long long int) -TVMET_IMPLEMENT_MACRO(eq, ==, long long int) -TVMET_IMPLEMENT_MACRO(not_eq, !=, long long int) -TVMET_IMPLEMENT_MACRO(and, &&, long long int) -TVMET_IMPLEMENT_MACRO(or, ||, long long int) -#endif // defined(TVMET_HAVE_LONG_LONG) - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, float) -TVMET_IMPLEMENT_MACRO(less, <, float) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, float) -TVMET_IMPLEMENT_MACRO(less_eq, <=, float) -TVMET_IMPLEMENT_MACRO(eq, ==, float) -TVMET_IMPLEMENT_MACRO(not_eq, !=, float) -TVMET_IMPLEMENT_MACRO(and, &&, float) -TVMET_IMPLEMENT_MACRO(or, ||, float) - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, double) -TVMET_IMPLEMENT_MACRO(less, <, double) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, double) -TVMET_IMPLEMENT_MACRO(less_eq, <=, double) -TVMET_IMPLEMENT_MACRO(eq, ==, double) -TVMET_IMPLEMENT_MACRO(not_eq, !=, double) -TVMET_IMPLEMENT_MACRO(and, &&, double) -TVMET_IMPLEMENT_MACRO(or, ||, double) - -#if defined(TVMET_HAVE_LONG_DOUBLE) -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, long double) -TVMET_IMPLEMENT_MACRO(less, <, long double) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, long double) -TVMET_IMPLEMENT_MACRO(less_eq, <=, long double) -TVMET_IMPLEMENT_MACRO(eq, ==, long double) -TVMET_IMPLEMENT_MACRO(not_eq, !=, long double) -TVMET_IMPLEMENT_MACRO(and, &&, long double) -TVMET_IMPLEMENT_MACRO(or, ||, long double) -#endif // defined(TVMET_HAVE_LONG_DOUBLE) - -#undef TVMET_IMPLEMENT_MACRO - /*++++++++++++++++++++++++++++++++++++++++++++++++++++++++ * global unary operators @@ -930,8 +485,6 @@ operator OP (const XprMatrix<E, Rows, Cols>& m) { \ return XprMatrix<expr_type, Rows, Cols>(expr_type(m)); \ } -TVMET_IMPLEMENT_MACRO(not, !) -TVMET_IMPLEMENT_MACRO(compl, ~) TVMET_IMPLEMENT_MACRO(neg, -) #undef TVMET_IMPLEMENT_MACRO diff --git a/tvmet-1.7.1/include/tvmet/xpr/MatrixRow.h b/tvmet-1.7.1/include/tvmet/xpr/MatrixRow.h index 8da0bbb0b..d8a796858 100644 --- a/tvmet-1.7.1/include/tvmet/xpr/MatrixRow.h +++ b/tvmet-1.7.1/include/tvmet/xpr/MatrixRow.h @@ -21,6 +21,8 @@ * $Id: MatrixRow.h,v 1.14 2004/09/16 09:14:18 opetzold Exp $ */ +#include <cassert> + #ifndef TVMET_XPR_MATRIX_ROW_H #define TVMET_XPR_MATRIX_ROW_H @@ -53,7 +55,7 @@ public: explicit XprMatrixRow(const E& e, int no) : m_expr(e), m_row(no) { - TVMET_RT_CONDITION(no < Rows, "XprMatrixRow Bounce Violation") + assert(no < Rows); } /** Copy Constructor. Not explicit! */ @@ -64,7 +66,7 @@ public: #endif value_type operator()(int j) const { - TVMET_RT_CONDITION(j < Cols, "XprMatrixRow Bounce Violation") + assert(j < Cols); return m_expr(m_row, j); } diff --git a/tvmet-1.7.1/include/tvmet/xpr/MatrixUnaryFunctions.h b/tvmet-1.7.1/include/tvmet/xpr/MatrixUnaryFunctions.h deleted file mode 100644 index 5a3a899ef..000000000 --- a/tvmet-1.7.1/include/tvmet/xpr/MatrixUnaryFunctions.h +++ /dev/null @@ -1,172 +0,0 @@ -/* - * Tiny Vector Matrix Library - * Dense Vector Matrix Libary of Tiny size using Expression Templates - * - * Copyright (C) 2001 - 2003 Olaf Petzold <opetzold@users.sourceforge.net> - * - * This library is free software; you can redistribute it and/or - * modify it under the terms of the GNU lesser General Public - * License as published by the Free Software Foundation; either - * version 2.1 of the License, or (at your option) any later version. - * - * This library is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU - * lesser General Public License for more details. - * - * You should have received a copy of the GNU lesser General Public - * License along with this library; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - * - * $Id: MatrixUnaryFunctions.h,v 1.7 2004/06/10 16:36:55 opetzold Exp $ - */ - -#ifndef TVMET_XPR_MATRIX_UNARY_FUNCTIONS_H -#define TVMET_XPR_MATRIX_UNARY_FUNCTIONS_H - -namespace tvmet { - - -/********************************************************* - * PART I: DECLARATION - *********************************************************/ - - -/* - * unary_function(XprMatrix<E, Rows, Cols>) - */ -#define TVMET_DECLARE_MACRO(NAME) \ -template<class E, int Rows, int Cols> \ -inline \ -XprMatrix< \ - XprUnOp< \ - Fcnl_##NAME<typename E::value_type>, \ - XprMatrix<E, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -NAME(const XprMatrix<E, Rows, Cols>& rhs) TVMET_CXX_ALWAYS_INLINE; - -TVMET_DECLARE_MACRO(abs) -TVMET_DECLARE_MACRO(cbrt) -TVMET_DECLARE_MACRO(ceil) -TVMET_DECLARE_MACRO(floor) -TVMET_DECLARE_MACRO(rint) -TVMET_DECLARE_MACRO(sin) -TVMET_DECLARE_MACRO(cos) -TVMET_DECLARE_MACRO(tan) -TVMET_DECLARE_MACRO(sinh) -TVMET_DECLARE_MACRO(cosh) -TVMET_DECLARE_MACRO(tanh) -TVMET_DECLARE_MACRO(asin) -TVMET_DECLARE_MACRO(acos) -TVMET_DECLARE_MACRO(atan) -TVMET_DECLARE_MACRO(exp) -TVMET_DECLARE_MACRO(log) -TVMET_DECLARE_MACRO(log10) -TVMET_DECLARE_MACRO(sqrt) - -#if defined(TVMET_HAVE_IEEE_MATH) -TVMET_DECLARE_MACRO(asinh) -TVMET_DECLARE_MACRO(acosh) -TVMET_DECLARE_MACRO(atanh) -TVMET_DECLARE_MACRO(expm1) -TVMET_DECLARE_MACRO(log1p) -TVMET_DECLARE_MACRO(erf) -TVMET_DECLARE_MACRO(erfc) -TVMET_DECLARE_MACRO(j0) -TVMET_DECLARE_MACRO(j1) -TVMET_DECLARE_MACRO(y0) -TVMET_DECLARE_MACRO(y1) -TVMET_DECLARE_MACRO(lgamma) -/** \todo isnan etc. - default return is only an int! */ -#if !defined(TVMET_NO_IEEE_MATH_ISNAN) -TVMET_DECLARE_MACRO(isnan) -#endif -#if !defined(TVMET_NO_IEEE_MATH_ISINF) -TVMET_DECLARE_MACRO(isinf) -#endif -TVMET_DECLARE_MACRO(finite) -#endif // defined(TVMET_HAVE_IEEE_MATH) - -#undef TVMET_DECLARE_MACRO - - -/********************************************************* - * PART II: IMPLEMENTATION - *********************************************************/ - - -/* - * unary_function(XprMatrix<E, Rows, Cols>) - */ -#define TVMET_IMPLEMENT_MACRO(NAME) \ -template<class E, int Rows, int Cols> \ -inline \ -XprMatrix< \ - XprUnOp< \ - Fcnl_##NAME<typename E::value_type>, \ - XprMatrix<E, Rows, Cols> \ - >, \ - Rows, Cols \ -> \ -NAME(const XprMatrix<E, Rows, Cols>& rhs) { \ - typedef XprUnOp< \ - Fcnl_##NAME<typename E::value_type>, \ - XprMatrix<E, Rows, Cols> \ - > expr_type; \ - return XprMatrix<expr_type, Rows, Cols>(expr_type(rhs)); \ -} - -TVMET_IMPLEMENT_MACRO(abs) -TVMET_IMPLEMENT_MACRO(cbrt) -TVMET_IMPLEMENT_MACRO(ceil) -TVMET_IMPLEMENT_MACRO(floor) -TVMET_IMPLEMENT_MACRO(rint) -TVMET_IMPLEMENT_MACRO(sin) -TVMET_IMPLEMENT_MACRO(cos) -TVMET_IMPLEMENT_MACRO(tan) -TVMET_IMPLEMENT_MACRO(sinh) -TVMET_IMPLEMENT_MACRO(cosh) -TVMET_IMPLEMENT_MACRO(tanh) -TVMET_IMPLEMENT_MACRO(asin) -TVMET_IMPLEMENT_MACRO(acos) -TVMET_IMPLEMENT_MACRO(atan) -TVMET_IMPLEMENT_MACRO(exp) -TVMET_IMPLEMENT_MACRO(log) -TVMET_IMPLEMENT_MACRO(log10) -TVMET_IMPLEMENT_MACRO(sqrt) - -#if defined(TVMET_HAVE_IEEE_MATH) -TVMET_IMPLEMENT_MACRO(asinh) -TVMET_IMPLEMENT_MACRO(acosh) -TVMET_IMPLEMENT_MACRO(atanh) -TVMET_IMPLEMENT_MACRO(expm1) -TVMET_IMPLEMENT_MACRO(log1p) -TVMET_IMPLEMENT_MACRO(erf) -TVMET_IMPLEMENT_MACRO(erfc) -TVMET_IMPLEMENT_MACRO(j0) -TVMET_IMPLEMENT_MACRO(j1) -TVMET_IMPLEMENT_MACRO(y0) -TVMET_IMPLEMENT_MACRO(y1) -TVMET_IMPLEMENT_MACRO(lgamma) -/** \todo isnan etc. - default return is only an int! */ -#if !defined(TVMET_NO_IEEE_MATH_ISNAN) -TVMET_IMPLEMENT_MACRO(isnan) -#endif -#if !defined(TVMET_NO_IEEE_MATH_ISINF) -TVMET_IMPLEMENT_MACRO(isinf) -#endif -TVMET_IMPLEMENT_MACRO(finite) -#endif // defined(TVMET_HAVE_IEEE_MATH) - -#undef TVMET_IMPLEMENT_MACRO - - -} // namespace tvmet - -#endif // TVMET_XPR_MATRIX_UNARY_FUNCTIONS_H - -// Local Variables: -// mode:C++ -// End: diff --git a/tvmet-1.7.1/include/tvmet/xpr/MtMProduct.h b/tvmet-1.7.1/include/tvmet/xpr/MtMProduct.h index 733ec9817..f985ca7f7 100644 --- a/tvmet-1.7.1/include/tvmet/xpr/MtMProduct.h +++ b/tvmet-1.7.1/include/tvmet/xpr/MtMProduct.h @@ -24,6 +24,8 @@ #ifndef TVMET_XPR_MTMPRODUCT_H #define TVMET_XPR_MTMPRODUCT_H +#include <cassert> + #include <tvmet/meta/Gemtm.h> #include <tvmet/loop/Gemtm.h> @@ -100,7 +102,7 @@ private: public: /** index operator for arrays/matrices */ value_type operator()(int i, int j) const { - TVMET_RT_CONDITION((i < Cols1) && (j < Cols2), "XprMtMProduct Bounce Violation") + assert((i < Cols1) && (j < Cols2)); return do_gemtm(dispatch<use_meta>(), m_lhs, m_rhs, i, j); } diff --git a/tvmet-1.7.1/include/tvmet/xpr/MtVProduct.h b/tvmet-1.7.1/include/tvmet/xpr/MtVProduct.h index 2f592d8f3..3967dbe42 100644 --- a/tvmet-1.7.1/include/tvmet/xpr/MtVProduct.h +++ b/tvmet-1.7.1/include/tvmet/xpr/MtVProduct.h @@ -24,6 +24,8 @@ #ifndef TVMET_XPR_MTVPRODUCT_H #define TVMET_XPR_MTVPRODUCT_H +#include <cassert> + #include <tvmet/meta/Gemtv.h> #include <tvmet/loop/Gemtv.h> @@ -95,7 +97,7 @@ public: /** index operator, returns the expression by index. This is the vector style since a matrix*vector gives a vector. */ value_type operator()(int j) const { - TVMET_RT_CONDITION(j < Cols , "XprMtVProduct Bounce Violation") + assert(j < Cols); return do_gemtv(dispatch<use_meta>(), m_lhs, m_rhs, j); } diff --git a/tvmet-1.7.1/include/tvmet/xpr/Vector.h b/tvmet-1.7.1/include/tvmet/xpr/Vector.h index 6416c648a..e2a798f85 100644 --- a/tvmet-1.7.1/include/tvmet/xpr/Vector.h +++ b/tvmet-1.7.1/include/tvmet/xpr/Vector.h @@ -84,7 +84,7 @@ public: /** const index operator for vectors. */ value_type operator()(int i) const { - TVMET_RT_CONDITION(i < Size, "XprVector Bounce Violation") + assert(i < Size); return m_expr(i); } @@ -145,7 +145,6 @@ private: #include <tvmet/xpr/VectorFunctions.h> #include <tvmet/xpr/VectorBinaryFunctions.h> -#include <tvmet/xpr/VectorUnaryFunctions.h> #include <tvmet/xpr/VectorOperators.h> #include <tvmet/xpr/Eval.h> diff --git a/tvmet-1.7.1/include/tvmet/xpr/VectorOperators.h b/tvmet-1.7.1/include/tvmet/xpr/VectorOperators.h index 673a1915c..ec4d2d89b 100644 --- a/tvmet-1.7.1/include/tvmet/xpr/VectorOperators.h +++ b/tvmet-1.7.1/include/tvmet/xpr/VectorOperators.h @@ -173,205 +173,6 @@ TVMET_DECLARE_MACRO(div, /) // per se element wise /*++++++++++++++++++++++++++++++++++++++++++++++++++++++++ - * Vector integer and compare operators - *+++++++++++++++++++++++++++++++++++++++++++++++++++++++*/ - - -/* - * operator(XprVector, XprVector) - */ -#define TVMET_DECLARE_MACRO(NAME, OP) \ -template<class E1, class E2, int Sz> \ -inline \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME<typename E1::value_type, typename E2::value_type>, \ - XprVector<E1, Sz>, \ - XprVector<E2, Sz> \ - >, \ - Sz \ -> \ -operator OP (const XprVector<E1, Sz>& lhs, \ - const XprVector<E2, Sz>& rhs) TVMET_CXX_ALWAYS_INLINE; - -// integer operators only, e.g used on double you wil get an error -namespace element_wise { - TVMET_DECLARE_MACRO(mod, %) - TVMET_DECLARE_MACRO(bitxor, ^) - TVMET_DECLARE_MACRO(bitand, &) - TVMET_DECLARE_MACRO(bitor, |) - TVMET_DECLARE_MACRO(shl, <<) - TVMET_DECLARE_MACRO(shr, >>) -} - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >) -TVMET_DECLARE_MACRO(less, <) -TVMET_DECLARE_MACRO(greater_eq, >=) -TVMET_DECLARE_MACRO(less_eq, <=) -TVMET_DECLARE_MACRO(eq, ==) -TVMET_DECLARE_MACRO(not_eq, !=) -TVMET_DECLARE_MACRO(and, &&) -TVMET_DECLARE_MACRO(or, ||) - -#undef TVMET_DECLARE_MACRO - - -/* - * operator(Vector<T, Sz>, POD) - * operator(POD, Vector<T, Sz>) - * Note: operations are per se element_wise - */ -#define TVMET_DECLARE_MACRO(NAME, OP, TP) \ -template<class E, int Sz> \ -inline \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME<typename E::value_type, TP >, \ - XprVector<E, Sz>, \ - XprLiteral< TP > \ - >, \ - Sz \ -> \ -operator OP (const XprVector<E, Sz>& lhs, \ - TP rhs) TVMET_CXX_ALWAYS_INLINE; \ - \ -template<class E, int Sz> \ -inline \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME<TP, typename E::value_type>, \ - XprLiteral< TP >, \ - XprVector<E, Sz> \ - >, \ - Sz \ -> \ -operator OP (TP lhs, \ - const XprVector<E, Sz>& rhs) TVMET_CXX_ALWAYS_INLINE; - -// integer operators only, e.g used on double you wil get an error -namespace element_wise { - TVMET_DECLARE_MACRO(mod, %, int) - TVMET_DECLARE_MACRO(bitxor, ^, int) - TVMET_DECLARE_MACRO(bitand, &, int) - TVMET_DECLARE_MACRO(bitor, |, int) - TVMET_DECLARE_MACRO(shl, <<, int) - TVMET_DECLARE_MACRO(shr, >>, int) -} - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, int) -TVMET_DECLARE_MACRO(less, <, int) -TVMET_DECLARE_MACRO(greater_eq, >=, int) -TVMET_DECLARE_MACRO(less_eq, <=, int) -TVMET_DECLARE_MACRO(eq, ==, int) -TVMET_DECLARE_MACRO(not_eq, !=, int) -TVMET_DECLARE_MACRO(and, &&, int) -TVMET_DECLARE_MACRO(or, ||, int) - - -#if defined(TVMET_HAVE_LONG_LONG) -// integer operators only -namespace element_wise { - TVMET_DECLARE_MACRO(mod, %, long long int) - TVMET_DECLARE_MACRO(bitxor, ^, long long int) - TVMET_DECLARE_MACRO(bitand, &, long long int) - TVMET_DECLARE_MACRO(bitor, |, long long int) - TVMET_DECLARE_MACRO(shl, <<, long long int) - TVMET_DECLARE_MACRO(shr, >>, long long int) -} - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, long long int) -TVMET_DECLARE_MACRO(less, <, long long int) -TVMET_DECLARE_MACRO(greater_eq, >=, long long int) -TVMET_DECLARE_MACRO(less_eq, <=, long long int) -TVMET_DECLARE_MACRO(eq, ==, long long int) -TVMET_DECLARE_MACRO(not_eq, !=, long long int) -TVMET_DECLARE_MACRO(and, &&, long long int) -TVMET_DECLARE_MACRO(or, ||, long long int) -#endif // defined(TVMET_HAVE_LONG_LONG) - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, float) -TVMET_DECLARE_MACRO(less, <, float) -TVMET_DECLARE_MACRO(greater_eq, >=, float) -TVMET_DECLARE_MACRO(less_eq, <=, float) -TVMET_DECLARE_MACRO(eq, ==, float) -TVMET_DECLARE_MACRO(not_eq, !=, float) - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, double) -TVMET_DECLARE_MACRO(less, <, double) -TVMET_DECLARE_MACRO(greater_eq, >=, double) -TVMET_DECLARE_MACRO(less_eq, <=, double) -TVMET_DECLARE_MACRO(eq, ==, double) -TVMET_DECLARE_MACRO(not_eq, !=, double) - -#if defined(TVMET_HAVE_LONG_DOUBLE) -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >, long double) -TVMET_DECLARE_MACRO(less, <, long double) -TVMET_DECLARE_MACRO(greater_eq, >=, long double) -TVMET_DECLARE_MACRO(less_eq, <=, long double) -TVMET_DECLARE_MACRO(eq, ==, long double) -TVMET_DECLARE_MACRO(not_eq, !=, long double) -#endif // defined(TVMET_HAVE_LONG_DOUBLE) - -#undef TVMET_DECLARE_MACRO - - -#if defined(TVMET_HAVE_COMPLEX) -/* - * operator(Vector<std::complex<T>, Sz>, std::complex<T>) - * operator(std::complex<T>, Vector<std::complex<T>, Sz>) - * Note: - per se element wise - * - bit ops on complex<int> doesn't make sense, stay away - * \todo type promotion - */ -#define TVMET_DECLARE_MACRO(NAME, OP) \ -template<class E, int Sz, class T> \ -inline \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME<typename E::value_type, std::complex<T> >, \ - XprVector<E, Sz>, \ - XprLiteral< std::complex<T> > \ - >, \ - Sz \ -> \ -operator OP (const XprVector<E, Sz>& lhs, \ - const std::complex<T>& rhs) TVMET_CXX_ALWAYS_INLINE; \ - \ -template<class E, int Sz, class T> \ -inline \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME<std::complex<T>, typename E::value_type>, \ - XprLiteral< std::complex<T> >, \ - XprVector<E, Sz> \ - >, \ - Sz \ -> \ -operator OP (const std::complex<T>& lhs, \ - const XprVector<E, Sz>& rhs) TVMET_CXX_ALWAYS_INLINE; - -// necessary operators for eval functions -TVMET_DECLARE_MACRO(greater, >) -TVMET_DECLARE_MACRO(less, <) -TVMET_DECLARE_MACRO(greater_eq, >=) -TVMET_DECLARE_MACRO(less_eq, <=) -TVMET_DECLARE_MACRO(eq, ==) -TVMET_DECLARE_MACRO(not_eq, !=) -TVMET_DECLARE_MACRO(and, &&) -TVMET_DECLARE_MACRO(or, ||) - -#undef TVMET_DECLARE_MACRO - -#endif // defined(TVMET_HAVE_COMPLEX) - - -/*++++++++++++++++++++++++++++++++++++++++++++++++++++++++ * global unary operators *+++++++++++++++++++++++++++++++++++++++++++++++++++++++*/ @@ -391,8 +192,6 @@ XprVector< \ > \ operator OP (const XprVector<E, Sz>& rhs) TVMET_CXX_ALWAYS_INLINE; -TVMET_DECLARE_MACRO(not, !) -TVMET_DECLARE_MACRO(compl, ~) TVMET_DECLARE_MACRO(neg, -) #undef TVMET_DECLARE_MACRO @@ -552,242 +351,6 @@ TVMET_IMPLEMENT_MACRO(div, /) // per se element wise /*++++++++++++++++++++++++++++++++++++++++++++++++++++++++ - * Vector integer and compare operators - *+++++++++++++++++++++++++++++++++++++++++++++++++++++++*/ - - -/* - * operator(XprVector, XprVector) - */ -#define TVMET_IMPLEMENT_MACRO(NAME, OP) \ -template<class E1, class E2, int Sz> \ -inline \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME<typename E1::value_type, typename E2::value_type>, \ - XprVector<E1, Sz>, \ - XprVector<E2, Sz> \ - >, \ - Sz \ -> \ -operator OP (const XprVector<E1, Sz>& lhs, \ - const XprVector<E2, Sz>& rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME<typename E1::value_type, typename E2::value_type>, \ - XprVector<E1, Sz>, \ - XprVector<E2, Sz> \ - > expr_type; \ - return XprVector<expr_type, Sz>(expr_type(lhs, rhs)); \ -} - -// integer operators only, e.g used on double you wil get an error -namespace element_wise { - TVMET_IMPLEMENT_MACRO(mod, %) - TVMET_IMPLEMENT_MACRO(bitxor, ^) - TVMET_IMPLEMENT_MACRO(bitand, &) - TVMET_IMPLEMENT_MACRO(bitor, |) - TVMET_IMPLEMENT_MACRO(shl, <<) - TVMET_IMPLEMENT_MACRO(shr, >>) -} - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >) -TVMET_IMPLEMENT_MACRO(less, <) -TVMET_IMPLEMENT_MACRO(greater_eq, >=) -TVMET_IMPLEMENT_MACRO(less_eq, <=) -TVMET_IMPLEMENT_MACRO(eq, ==) -TVMET_IMPLEMENT_MACRO(not_eq, !=) -TVMET_IMPLEMENT_MACRO(and, &&) -TVMET_IMPLEMENT_MACRO(or, ||) - -#undef TVMET_IMPLEMENT_MACRO - - -/* - * operator(Vector<T, Sz>, POD) - * operator(POD, Vector<T, Sz>) - * Note: operations are per se element_wise - */ -#define TVMET_IMPLEMENT_MACRO(NAME, OP, TP) \ -template<class E, int Sz> \ -inline \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME<typename E::value_type, TP >, \ - XprVector<E, Sz>, \ - XprLiteral< TP > \ - >, \ - Sz \ -> \ -operator OP (const XprVector<E, Sz>& lhs, TP rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME<typename E::value_type, TP >, \ - XprVector<E, Sz>, \ - XprLiteral< TP > \ - > expr_type; \ - return XprVector<expr_type, Sz>( \ - expr_type(lhs, XprLiteral< TP >(rhs))); \ -} \ - \ -template<class E, int Sz> \ -inline \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME<TP, typename E::value_type>, \ - XprLiteral< TP >, \ - XprVector<E, Sz> \ - >, \ - Sz \ -> \ -operator OP (TP lhs, const XprVector<E, Sz>& rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME< TP, typename E::value_type>, \ - XprLiteral< TP >, \ - XprVector<E, Sz> \ - > expr_type; \ - return XprVector<expr_type, Sz>( \ - expr_type(XprLiteral< TP >(lhs), rhs)); \ -} - -// integer operators only, e.g used on double you wil get an error -namespace element_wise { - TVMET_IMPLEMENT_MACRO(mod, %, int) - TVMET_IMPLEMENT_MACRO(bitxor, ^, int) - TVMET_IMPLEMENT_MACRO(bitand, &, int) - TVMET_IMPLEMENT_MACRO(bitor, |, int) - TVMET_IMPLEMENT_MACRO(shl, <<, int) - TVMET_IMPLEMENT_MACRO(shr, >>, int) -} - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, int) -TVMET_IMPLEMENT_MACRO(less, <, int) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, int) -TVMET_IMPLEMENT_MACRO(less_eq, <=, int) -TVMET_IMPLEMENT_MACRO(eq, ==, int) -TVMET_IMPLEMENT_MACRO(not_eq, !=, int) -TVMET_IMPLEMENT_MACRO(and, &&, int) -TVMET_IMPLEMENT_MACRO(or, ||, int) - - -#if defined(TVMET_HAVE_LONG_LONG) -// integer operators only -namespace element_wise { - TVMET_IMPLEMENT_MACRO(mod, %, long long int) - TVMET_IMPLEMENT_MACRO(bitxor, ^, long long int) - TVMET_IMPLEMENT_MACRO(bitand, &, long long int) - TVMET_IMPLEMENT_MACRO(bitor, |, long long int) - TVMET_IMPLEMENT_MACRO(shl, <<, long long int) - TVMET_IMPLEMENT_MACRO(shr, >>, long long int) -} - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, long long int) -TVMET_IMPLEMENT_MACRO(less, <, long long int) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, long long int) -TVMET_IMPLEMENT_MACRO(less_eq, <=, long long int) -TVMET_IMPLEMENT_MACRO(eq, ==, long long int) -TVMET_IMPLEMENT_MACRO(not_eq, !=, long long int) -TVMET_IMPLEMENT_MACRO(and, &&, long long int) -TVMET_IMPLEMENT_MACRO(or, ||, long long int) -#endif // defined(TVMET_HAVE_LONG_LONG) - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, float) -TVMET_IMPLEMENT_MACRO(less, <, float) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, float) -TVMET_IMPLEMENT_MACRO(less_eq, <=, float) -TVMET_IMPLEMENT_MACRO(eq, ==, float) -TVMET_IMPLEMENT_MACRO(not_eq, !=, float) - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, double) -TVMET_IMPLEMENT_MACRO(less, <, double) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, double) -TVMET_IMPLEMENT_MACRO(less_eq, <=, double) -TVMET_IMPLEMENT_MACRO(eq, ==, double) -TVMET_IMPLEMENT_MACRO(not_eq, !=, double) - -#if defined(TVMET_HAVE_LONG_DOUBLE) -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >, long double) -TVMET_IMPLEMENT_MACRO(less, <, long double) -TVMET_IMPLEMENT_MACRO(greater_eq, >=, long double) -TVMET_IMPLEMENT_MACRO(less_eq, <=, long double) -TVMET_IMPLEMENT_MACRO(eq, ==, long double) -TVMET_IMPLEMENT_MACRO(not_eq, !=, long double) -#endif // defined(TVMET_HAVE_LONG_DOUBLE) - -#undef TVMET_IMPLEMENT_MACRO - - -#if defined(TVMET_HAVE_COMPLEX) -/* - * operator(Vector<std::complex<T>, Sz>, std::complex<T>) - * operator(std::complex<T>, Vector<std::complex<T>, Sz>) - * Note: - per se element wise - * - bit ops on complex<int> doesn't make sense, stay away - * \todo type promotion - */ -#define TVMET_IMPLEMENT_MACRO(NAME, OP) \ -template<class E, int Sz, class T> \ -inline \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME<typename E::value_type, std::complex<T> >, \ - XprVector<E, Sz>, \ - XprLiteral< std::complex<T> > \ - >, \ - Sz \ -> \ -operator OP (const XprVector<E, Sz>& lhs, \ - const std::complex<T>& rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME<typename E::value_type, std::complex<T> >, \ - XprVector<E, Sz>, \ - XprLiteral< std::complex<T> > \ - > expr_type; \ - return XprVector<expr_type, Sz>( \ - expr_type(lhs, XprLiteral< std::complex<T> >(rhs))); \ -} \ - \ -template<class E, int Sz, class T> \ -inline \ -XprVector< \ - XprBinOp< \ - Fcnl_##NAME<std::complex<T>, typename E::value_type>, \ - XprLiteral< std::complex<T> >, \ - XprVector<E, Sz> \ - >, \ - Sz \ -> \ -operator OP (const std::complex<T>& lhs, \ - const XprVector<E, Sz>& rhs) { \ - typedef XprBinOp< \ - Fcnl_##NAME< std::complex<T>, typename E::value_type>, \ - XprLiteral< std::complex<T> >, \ - XprVector<E, Sz> \ - > expr_type; \ - return XprVector<expr_type, Sz>( \ - expr_type(XprLiteral< std::complex<T> >(lhs), rhs)); \ -} - -// necessary operators for eval functions -TVMET_IMPLEMENT_MACRO(greater, >) -TVMET_IMPLEMENT_MACRO(less, <) -TVMET_IMPLEMENT_MACRO(greater_eq, >=) -TVMET_IMPLEMENT_MACRO(less_eq, <=) -TVMET_IMPLEMENT_MACRO(eq, ==) -TVMET_IMPLEMENT_MACRO(not_eq, !=) -TVMET_IMPLEMENT_MACRO(and, &&) -TVMET_IMPLEMENT_MACRO(or, ||) - -#undef TVMET_IMPLEMENT_MACRO - -#endif // defined(TVMET_HAVE_COMPLEX) - - -/*++++++++++++++++++++++++++++++++++++++++++++++++++++++++ * global unary operators *+++++++++++++++++++++++++++++++++++++++++++++++++++++++*/ @@ -813,8 +376,6 @@ operator OP (const XprVector<E, Sz>& rhs) { \ return XprVector<expr_type, Sz>(expr_type(rhs)); \ } -TVMET_IMPLEMENT_MACRO(not, !) -TVMET_IMPLEMENT_MACRO(compl, ~) TVMET_IMPLEMENT_MACRO(neg, -) #undef TVMET_IMPLEMENT_MACRO diff --git a/tvmet-1.7.1/include/tvmet/xpr/VectorUnaryFunctions.h b/tvmet-1.7.1/include/tvmet/xpr/VectorUnaryFunctions.h deleted file mode 100644 index 0f72eac16..000000000 --- a/tvmet-1.7.1/include/tvmet/xpr/VectorUnaryFunctions.h +++ /dev/null @@ -1,172 +0,0 @@ -/* - * Tiny Vector Matrix Library - * Dense Vector Matrix Libary of Tiny size using Expression Templates - * - * Copyright (C) 2001 - 2003 Olaf Petzold <opetzold@users.sourceforge.net> - * - * This library is free software; you can redistribute it and/or - * modify it under the terms of the GNU Lesser General Public - * License as published by the Free Software Foundation; either - * version 2.1 of the License, or (at your option) any later version. - * - * This library is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU - * Lesser General Public License for more details. - * - * You should have received a copy of the GNU Lesser General Public - * License along with this library; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - * - * $Id: VectorUnaryFunctions.h,v 1.7 2004/06/10 16:36:55 opetzold Exp $ - */ - -#ifndef TVMET_XPR_VECTOR_UNARY_FUNCTIONS_H -#define TVMET_XPR_VECTOR_UNARY_FUNCTIONS_H - -namespace tvmet { - - -/********************************************************* - * PART I: DECLARATION - *********************************************************/ - -/* - * unary_function(XprVector<E, Sz>) - */ -#define TVMET_DECLARE_MACRO(NAME) \ -template<class E, int Sz> \ -inline \ -XprVector< \ - XprUnOp< \ - Fcnl_##NAME<typename E::value_type>, \ - XprVector<E, Sz> \ - >, \ - Sz \ -> \ -NAME(const XprVector<E, Sz>& rhs) TVMET_CXX_ALWAYS_INLINE; - -TVMET_DECLARE_MACRO(abs) -TVMET_DECLARE_MACRO(cbrt) -TVMET_DECLARE_MACRO(ceil) -TVMET_DECLARE_MACRO(floor) -TVMET_DECLARE_MACRO(rint) -TVMET_DECLARE_MACRO(sin) -TVMET_DECLARE_MACRO(cos) -TVMET_DECLARE_MACRO(tan) -TVMET_DECLARE_MACRO(sinh) -TVMET_DECLARE_MACRO(cosh) -TVMET_DECLARE_MACRO(tanh) -TVMET_DECLARE_MACRO(asin) -TVMET_DECLARE_MACRO(acos) -TVMET_DECLARE_MACRO(atan) -TVMET_DECLARE_MACRO(exp) -TVMET_DECLARE_MACRO(log) -TVMET_DECLARE_MACRO(log10) -TVMET_DECLARE_MACRO(sqrt) - -#if defined(TVMET_HAVE_IEEE_MATH) -TVMET_DECLARE_MACRO(asinh) -TVMET_DECLARE_MACRO(acosh) -TVMET_DECLARE_MACRO(atanh) -TVMET_DECLARE_MACRO(expm1) -TVMET_DECLARE_MACRO(log1p) -TVMET_DECLARE_MACRO(erf) -TVMET_DECLARE_MACRO(erfc) -TVMET_DECLARE_MACRO(j0) -TVMET_DECLARE_MACRO(j1) -TVMET_DECLARE_MACRO(y0) -TVMET_DECLARE_MACRO(y1) -TVMET_DECLARE_MACRO(lgamma) -/** \todo isnan etc. - default return is only an int! */ -#if !defined(TVMET_NO_IEEE_MATH_ISNAN) -TVMET_DECLARE_MACRO(isnan) -#endif -#if !defined(TVMET_NO_IEEE_MATH_ISINF) -TVMET_DECLARE_MACRO(isinf) -#endif -TVMET_DECLARE_MACRO(finite) -#endif // defined(TVMET_HAVE_IEEE_MATH) - -#undef TVMET_DECLARE_MACRO - - -/********************************************************* - * PART II: IMPLEMENTATION - *********************************************************/ - - -/* - * unary_function(XprVector<E, Sz>) - */ -#define TVMET_IMPLEMENT_MACRO(NAME) \ -template<class E, int Sz> \ -inline \ -XprVector< \ - XprUnOp< \ - Fcnl_##NAME<typename E::value_type>, \ - XprVector<E, Sz> \ - >, \ - Sz \ -> \ -NAME(const XprVector<E, Sz>& rhs) { \ - typedef XprUnOp< \ - Fcnl_##NAME<typename E::value_type>, \ - XprVector<E, Sz> \ - > expr_type; \ - return XprVector<expr_type, Sz>(expr_type(rhs)); \ -} - -TVMET_IMPLEMENT_MACRO(abs) -TVMET_IMPLEMENT_MACRO(cbrt) -TVMET_IMPLEMENT_MACRO(ceil) -TVMET_IMPLEMENT_MACRO(floor) -TVMET_IMPLEMENT_MACRO(rint) -TVMET_IMPLEMENT_MACRO(sin) -TVMET_IMPLEMENT_MACRO(cos) -TVMET_IMPLEMENT_MACRO(tan) -TVMET_IMPLEMENT_MACRO(sinh) -TVMET_IMPLEMENT_MACRO(cosh) -TVMET_IMPLEMENT_MACRO(tanh) -TVMET_IMPLEMENT_MACRO(asin) -TVMET_IMPLEMENT_MACRO(acos) -TVMET_IMPLEMENT_MACRO(atan) -TVMET_IMPLEMENT_MACRO(exp) -TVMET_IMPLEMENT_MACRO(log) -TVMET_IMPLEMENT_MACRO(log10) -TVMET_IMPLEMENT_MACRO(sqrt) - -#if defined(TVMET_HAVE_IEEE_MATH) -TVMET_IMPLEMENT_MACRO(asinh) -TVMET_IMPLEMENT_MACRO(acosh) -TVMET_IMPLEMENT_MACRO(atanh) -TVMET_IMPLEMENT_MACRO(expm1) -TVMET_IMPLEMENT_MACRO(log1p) -TVMET_IMPLEMENT_MACRO(erf) -TVMET_IMPLEMENT_MACRO(erfc) -TVMET_IMPLEMENT_MACRO(j0) -TVMET_IMPLEMENT_MACRO(j1) -TVMET_IMPLEMENT_MACRO(y0) -TVMET_IMPLEMENT_MACRO(y1) -TVMET_IMPLEMENT_MACRO(lgamma) -/** \todo isnan etc. - default return is only an int! */ -#if !defined(TVMET_NO_IEEE_MATH_ISNAN) -TVMET_IMPLEMENT_MACRO(isnan) -#endif -#if !defined(TVMET_NO_IEEE_MATH_ISINF) -TVMET_IMPLEMENT_MACRO(isinf) -#endif -TVMET_IMPLEMENT_MACRO(finite) -#endif // defined(TVMET_HAVE_IEEE_MATH) - -#undef TVMET_IMPLEMENT_MACRO - - - -} // namespace tvmet - -#endif // TVMET_XPR_VECTOR_FUNCTIONS_H - -// Local Variables: -// mode:C++ -// End: |