Chris@16
|
1 // -- numeric.hpp -- Boost Lambda Library -----------------------------------
|
Chris@16
|
2 // Copyright (C) 2002 Jaakko Jarvi (jaakko.jarvi@cs.utu.fi)
|
Chris@16
|
3 // Copyright (C) 2002 Gary Powell (gwpowell@hotmail.com)
|
Chris@16
|
4 //
|
Chris@16
|
5 // Distributed under the Boost Software License, Version 1.0. (See
|
Chris@16
|
6 // accompanying file LICENSE_1_0.txt or copy at
|
Chris@16
|
7 // http://www.boost.org/LICENSE_1_0.txt)
|
Chris@16
|
8 //
|
Chris@16
|
9 // For more information, see http://www.boost.org
|
Chris@16
|
10
|
Chris@16
|
11 #ifndef BOOST_LAMBDA_NUMERIC_HPP
|
Chris@16
|
12 #define BOOST_LAMBDA_NUMERIC_HPP
|
Chris@16
|
13
|
Chris@16
|
14 #include "boost/lambda/core.hpp"
|
Chris@16
|
15
|
Chris@16
|
16 #include <numeric>
|
Chris@16
|
17
|
Chris@16
|
18 namespace boost {
|
Chris@16
|
19 namespace lambda {
|
Chris@16
|
20
|
Chris@16
|
21 namespace ll {
|
Chris@16
|
22
|
Chris@16
|
23 // accumulate ---------------------------------
|
Chris@16
|
24
|
Chris@16
|
25 struct accumulate {
|
Chris@16
|
26
|
Chris@16
|
27 template <class Args>
|
Chris@16
|
28 struct sig {
|
Chris@16
|
29 typedef typename boost::remove_const<
|
Chris@16
|
30 typename boost::tuples::element<3, Args>::type
|
Chris@16
|
31 >::type type;
|
Chris@16
|
32 };
|
Chris@16
|
33
|
Chris@16
|
34 template <class A, class B, class C>
|
Chris@16
|
35 C
|
Chris@16
|
36 operator()(A a, B b, C c) const
|
Chris@16
|
37 { return ::std::accumulate(a, b, c); }
|
Chris@16
|
38
|
Chris@16
|
39 template <class A, class B, class C, class D>
|
Chris@16
|
40 C
|
Chris@16
|
41 operator()(A a, B b, C c, D d) const
|
Chris@16
|
42 { return ::std::accumulate(a, b, c, d); }
|
Chris@16
|
43 };
|
Chris@16
|
44
|
Chris@16
|
45 // inner_product ---------------------------------
|
Chris@16
|
46
|
Chris@16
|
47 struct inner_product {
|
Chris@16
|
48
|
Chris@16
|
49 template <class Args>
|
Chris@16
|
50 struct sig {
|
Chris@16
|
51 typedef typename boost::remove_const<
|
Chris@16
|
52 typename boost::tuples::element<4, Args>::type
|
Chris@16
|
53 >::type type;
|
Chris@16
|
54 };
|
Chris@16
|
55
|
Chris@16
|
56 template <class A, class B, class C, class D>
|
Chris@16
|
57 D
|
Chris@16
|
58 operator()(A a, B b, C c, D d) const
|
Chris@16
|
59 { return ::std::inner_product(a, b, c, d); }
|
Chris@16
|
60
|
Chris@16
|
61 template <class A, class B, class C, class D, class E, class F>
|
Chris@16
|
62 D
|
Chris@16
|
63 operator()(A a, B b, C c, D d, E e, F f) const
|
Chris@16
|
64 { return ::std::inner_product(a, b, c, d, e, f); }
|
Chris@16
|
65 };
|
Chris@16
|
66
|
Chris@16
|
67
|
Chris@16
|
68 // partial_sum ---------------------------------
|
Chris@16
|
69
|
Chris@16
|
70 struct partial_sum {
|
Chris@16
|
71
|
Chris@16
|
72 template <class Args>
|
Chris@16
|
73 struct sig {
|
Chris@16
|
74 typedef typename boost::remove_const<
|
Chris@16
|
75 typename boost::tuples::element<3, Args>::type
|
Chris@16
|
76 >::type type;
|
Chris@16
|
77 };
|
Chris@16
|
78
|
Chris@16
|
79 template <class A, class B, class C>
|
Chris@16
|
80 C
|
Chris@16
|
81 operator()(A a, B b, C c) const
|
Chris@16
|
82 { return ::std::partial_sum(a, b, c); }
|
Chris@16
|
83
|
Chris@16
|
84 template <class A, class B, class C, class D>
|
Chris@16
|
85 C
|
Chris@16
|
86 operator()(A a, B b, C c, D d) const
|
Chris@16
|
87 { return ::std::partial_sum(a, b, c, d); }
|
Chris@16
|
88 };
|
Chris@16
|
89
|
Chris@16
|
90 // adjacent_difference ---------------------------------
|
Chris@16
|
91
|
Chris@16
|
92 struct adjacent_difference {
|
Chris@16
|
93
|
Chris@16
|
94 template <class Args>
|
Chris@16
|
95 struct sig {
|
Chris@16
|
96 typedef typename boost::remove_const<
|
Chris@16
|
97 typename boost::tuples::element<3, Args>::type
|
Chris@16
|
98 >::type type;
|
Chris@16
|
99 };
|
Chris@16
|
100
|
Chris@16
|
101 template <class A, class B, class C>
|
Chris@16
|
102 C
|
Chris@16
|
103 operator()(A a, B b, C c) const
|
Chris@16
|
104 { return ::std::adjacent_difference(a, b, c); }
|
Chris@16
|
105
|
Chris@16
|
106 template <class A, class B, class C, class D>
|
Chris@16
|
107 C
|
Chris@16
|
108 operator()(A a, B b, C c, D d) const
|
Chris@16
|
109 { return ::std::adjacent_difference(a, b, c, d); }
|
Chris@16
|
110 };
|
Chris@16
|
111
|
Chris@16
|
112 } // end of ll namespace
|
Chris@16
|
113
|
Chris@16
|
114 } // end of lambda namespace
|
Chris@16
|
115 } // end of boost namespace
|
Chris@16
|
116
|
Chris@16
|
117
|
Chris@16
|
118
|
Chris@16
|
119 #endif
|