ublas_interop.hpp 4.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475
  1. ///////////////////////////////////////////////////////////////////////////////
  2. // Copyright 2013 John Maddock. Distributed under the Boost
  3. // Software License, Version 1.0. (See accompanying file
  4. // LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
  5. #ifndef BOOST_MP_UBLAS_HPP
  6. #define BOOST_MP_UBLAS_HPP
  7. namespace boost { namespace numeric { namespace ublas {
  8. template <class V>
  9. class sparse_vector_element;
  10. template <class V, class Backend, multiprecision::expression_template_option ExpressionTemplates>
  11. inline bool operator==(const sparse_vector_element<V>& a, const ::boost::multiprecision::number<Backend, ExpressionTemplates>& b)
  12. {
  13. typedef typename sparse_vector_element<V>::const_reference ref_type;
  14. return static_cast<ref_type>(a) == b;
  15. }
  16. template <class X, class Y>
  17. struct promote_traits;
  18. template <class Backend1, boost::multiprecision::expression_template_option ExpressionTemplates1, class Backend2, boost::multiprecision::expression_template_option ExpressionTemplates2>
  19. struct promote_traits<boost::multiprecision::number<Backend1, ExpressionTemplates1>, boost::multiprecision::number<Backend2, ExpressionTemplates2> >
  20. {
  21. typedef boost::multiprecision::number<Backend1, ExpressionTemplates1> number1_t;
  22. typedef boost::multiprecision::number<Backend2, ExpressionTemplates2> number2_t;
  23. typedef typename mpl::if_c<
  24. is_convertible<number1_t, number2_t>::value && !is_convertible<number2_t, number1_t>::value,
  25. number2_t, number1_t>::type promote_type;
  26. };
  27. template <class Backend1, boost::multiprecision::expression_template_option ExpressionTemplates1, class Arithmetic>
  28. struct promote_traits<boost::multiprecision::number<Backend1, ExpressionTemplates1>, Arithmetic>
  29. {
  30. typedef boost::multiprecision::number<Backend1, ExpressionTemplates1> promote_type;
  31. };
  32. template <class Arithmetic, class Backend1, boost::multiprecision::expression_template_option ExpressionTemplates1>
  33. struct promote_traits<Arithmetic, boost::multiprecision::number<Backend1, ExpressionTemplates1> >
  34. {
  35. typedef boost::multiprecision::number<Backend1, ExpressionTemplates1> promote_type;
  36. };
  37. template <class Backend1, boost::multiprecision::expression_template_option ExpressionTemplates1, class tag, class Arg1, class Arg2, class Arg3, class Arg4>
  38. struct promote_traits<boost::multiprecision::number<Backend1, ExpressionTemplates1>, boost::multiprecision::detail::expression<tag, Arg1, Arg2, Arg3, Arg4> >
  39. {
  40. typedef boost::multiprecision::number<Backend1, ExpressionTemplates1> number1_t;
  41. typedef boost::multiprecision::detail::expression<tag, Arg1, Arg2, Arg3, Arg4> expression_type;
  42. typedef typename expression_type::result_type number2_t;
  43. typedef typename promote_traits<number1_t, number2_t>::promote_type promote_type;
  44. };
  45. template <class tag, class Arg1, class Arg2, class Arg3, class Arg4, class Backend1, boost::multiprecision::expression_template_option ExpressionTemplates1>
  46. struct promote_traits<boost::multiprecision::detail::expression<tag, Arg1, Arg2, Arg3, Arg4>, boost::multiprecision::number<Backend1, ExpressionTemplates1> >
  47. {
  48. typedef boost::multiprecision::number<Backend1, ExpressionTemplates1> number1_t;
  49. typedef boost::multiprecision::detail::expression<tag, Arg1, Arg2, Arg3, Arg4> expression_type;
  50. typedef typename expression_type::result_type number2_t;
  51. typedef typename promote_traits<number1_t, number2_t>::promote_type promote_type;
  52. };
  53. template <class tag, class Arg1, class Arg2, class Arg3, class Arg4, class tagb, class Arg1b, class Arg2b, class Arg3b, class Arg4b>
  54. struct promote_traits<boost::multiprecision::detail::expression<tag, Arg1, Arg2, Arg3, Arg4>, boost::multiprecision::detail::expression<tagb, Arg1b, Arg2b, Arg3b, Arg4b> >
  55. {
  56. typedef boost::multiprecision::detail::expression<tag, Arg1, Arg2, Arg3, Arg4> expression1_t;
  57. typedef typename expression1_t::result_type number1_t;
  58. typedef boost::multiprecision::detail::expression<tagb, Arg1b, Arg2b, Arg3b, Arg4b> expression2_t;
  59. typedef typename expression2_t::result_type number2_t;
  60. };
  61. }}} // namespace boost::numeric::ublas
  62. #endif