summaryrefslogtreecommitdiffstats
path: root/src/boost/libs/math/test/functor.hpp
diff options
context:
space:
mode:
authorDaniel Baumann <daniel.baumann@progress-linux.org>2024-04-07 18:45:59 +0000
committerDaniel Baumann <daniel.baumann@progress-linux.org>2024-04-07 18:45:59 +0000
commit19fcec84d8d7d21e796c7624e521b60d28ee21ed (patch)
tree42d26aa27d1e3f7c0b8bd3fd14e7d7082f5008dc /src/boost/libs/math/test/functor.hpp
parentInitial commit. (diff)
downloadceph-upstream/16.2.11+ds.tar.xz
ceph-upstream/16.2.11+ds.zip
Adding upstream version 16.2.11+ds.upstream/16.2.11+dsupstream
Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
Diffstat (limited to 'src/boost/libs/math/test/functor.hpp')
-rw-r--r--src/boost/libs/math/test/functor.hpp213
1 files changed, 213 insertions, 0 deletions
diff --git a/src/boost/libs/math/test/functor.hpp b/src/boost/libs/math/test/functor.hpp
new file mode 100644
index 000000000..bb0f86455
--- /dev/null
+++ b/src/boost/libs/math/test/functor.hpp
@@ -0,0 +1,213 @@
+// (C) Copyright John Maddock 2007.
+// Use, modification and distribution are subject to the
+// Boost Software License, Version 1.0. (See accompanying file
+// LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
+
+#include <boost/math/special_functions/trunc.hpp>
+
+
+#ifndef BOOST_MATH_TEST_FUNCTOR_HPP
+#define BOOST_MATH_TEST_FUNCTOR_HPP
+
+template <class Real>
+struct extract_result_type
+{
+ extract_result_type(unsigned i) : m_location(i){}
+
+ template <class S>
+ Real operator()(const S& row)
+ {
+ return row[m_location];
+ }
+private:
+ unsigned m_location;
+};
+
+template <class Real>
+inline extract_result_type<Real> extract_result(unsigned i)
+{
+ return extract_result_type<Real>(i);
+}
+
+template <class Real, class F>
+struct row_binder1
+{
+ row_binder1(F _f, unsigned i) : f(_f), m_i(i) {}
+
+ template <class S>
+ Real operator()(const S& row)
+ {
+ return f(row[m_i]);
+ }
+
+private:
+ F f;
+ unsigned m_i;
+};
+
+template<class Real, class F>
+inline row_binder1<Real, F> bind_func(F f, unsigned i)
+{
+ return row_binder1<Real, F>(f, i);
+}
+
+template <class Real, class F>
+struct row_binder2
+{
+ row_binder2(F _f, unsigned i, unsigned j) : f(_f), m_i(i), m_j(j) {}
+
+ template <class S>
+ Real operator()(const S& row)
+ {
+ return f(row[m_i], row[m_j]);
+ }
+
+private:
+ F f;
+ unsigned m_i, m_j;
+};
+
+template<class Real, class F>
+inline row_binder2<Real, F> bind_func(F f, unsigned i, unsigned j)
+{
+ return row_binder2<Real, F>(f, i, j);
+}
+
+template <class Real, class F>
+struct row_binder3
+{
+ row_binder3(F _f, unsigned i, unsigned j, unsigned k) : f(_f), m_i(i), m_j(j), m_k(k) {}
+
+ template <class S>
+ Real operator()(const S& row)
+ {
+ return f(row[m_i], row[m_j], row[m_k]);
+ }
+
+private:
+ F f;
+ unsigned m_i, m_j, m_k;
+};
+
+template<class Real, class F>
+inline row_binder3<Real, F> bind_func(F f, unsigned i, unsigned j, unsigned k)
+{
+ return row_binder3<Real, F>(f, i, j, k);
+}
+
+template <class Real, class F>
+struct row_binder4
+{
+ row_binder4(F _f, unsigned i, unsigned j, unsigned k, unsigned l) : f(_f), m_i(i), m_j(j), m_k(k), m_l(l) {}
+
+ template <class S>
+ Real operator()(const S& row)
+ {
+ return f(row[m_i], row[m_j], row[m_k], row[m_l]);
+ }
+
+private:
+ F f;
+ unsigned m_i, m_j, m_k, m_l;
+};
+
+template<class Real, class F>
+inline row_binder4<Real, F> bind_func(F f, unsigned i, unsigned j, unsigned k, unsigned l)
+{
+ return row_binder4<Real, F>(f, i, j, k, l);
+}
+
+template <class Real, class F>
+struct row_binder2_i1
+{
+ row_binder2_i1(F _f, unsigned i, unsigned j) : f(_f), m_i(i), m_j(j) {}
+
+ template <class S>
+ Real operator()(const S& row)
+ {
+ return f(boost::math::itrunc(Real(row[m_i])), row[m_j]);
+ }
+
+private:
+ F f;
+ unsigned m_i, m_j;
+};
+
+template<class Real, class F>
+inline row_binder2_i1<Real, F> bind_func_int1(F f, unsigned i, unsigned j)
+{
+ return row_binder2_i1<Real, F>(f, i, j);
+}
+
+template <class Real, class F>
+struct row_binder3_i2
+{
+ row_binder3_i2(F _f, unsigned i, unsigned j, unsigned k) : f(_f), m_i(i), m_j(j), m_k(k) {}
+
+ template <class S>
+ Real operator()(const S& row)
+ {
+ return f(
+ boost::math::itrunc(Real(row[m_i])),
+ boost::math::itrunc(Real(row[m_j])),
+ row[m_k]);
+ }
+
+private:
+ F f;
+ unsigned m_i, m_j, m_k;
+};
+
+template<class Real, class F>
+inline row_binder3_i2<Real, F> bind_func_int2(F f, unsigned i, unsigned j, unsigned k)
+{
+ return row_binder3_i2<Real, F>(f, i, j, k);
+}
+
+template <class Real, class F>
+struct row_binder4_i2
+{
+ row_binder4_i2(F _f, unsigned i, unsigned j, unsigned k, unsigned l) : f(_f), m_i(i), m_j(j), m_k(k), m_l(l) {}
+
+ template <class S>
+ Real operator()(const S& row)
+ {
+ return f(
+ boost::math::itrunc(Real(row[m_i])),
+ boost::math::itrunc(Real(row[m_j])),
+ row[m_k],
+ row[m_l]);
+ }
+
+private:
+ F f;
+ unsigned m_i, m_j, m_k, m_l;
+};
+
+template<class Real, class F>
+inline row_binder4_i2<Real, F> bind_func_int2(F f, unsigned i, unsigned j, unsigned k, unsigned l)
+{
+ return row_binder4_i2<Real, F>(f, i, j, k, l);
+}
+
+template <class Real, class F>
+struct negate_type
+{
+ negate_type(F f) : m_f(f){}
+
+ template <class S>
+ Real operator()(const S& row)
+ {
+ return -Real(m_f(row));
+ }
+private:
+ F m_f;
+};
+
+template <class Real, class F>
+inline negate_type<Real, F> negate(F f)
+{
+ return negate_type<Real, F>(f);
+}
+
+#endif