Chris@16: // -- numeric.hpp -- Boost Lambda Library -----------------------------------
Chris@16: // Copyright (C) 2002 Jaakko Jarvi (jaakko.jarvi@cs.utu.fi)
Chris@16: // Copyright (C) 2002 Gary Powell (gwpowell@hotmail.com)
Chris@16: //
Chris@16: // Distributed under the Boost Software License, Version 1.0. (See
Chris@16: // accompanying file LICENSE_1_0.txt or copy at
Chris@16: // http://www.boost.org/LICENSE_1_0.txt)
Chris@16: //
Chris@16: // For more information, see http://www.boost.org
Chris@16: 
Chris@16: #ifndef BOOST_LAMBDA_NUMERIC_HPP
Chris@16: #define BOOST_LAMBDA_NUMERIC_HPP
Chris@16: 
Chris@16: #include "boost/lambda/core.hpp"
Chris@16: 
Chris@16: #include <numeric>
Chris@16: 
Chris@16: namespace boost {
Chris@16:   namespace lambda {
Chris@16: 
Chris@16: namespace ll {
Chris@16: 
Chris@16: // accumulate ---------------------------------
Chris@16: 
Chris@16: struct accumulate {
Chris@16:   
Chris@16:   template <class Args>
Chris@16:   struct sig { 
Chris@16:     typedef typename boost::remove_const<
Chris@16:         typename boost::tuples::element<3, Args>::type 
Chris@16:      >::type type; 
Chris@16:   };
Chris@16: 
Chris@16:   template <class A, class B, class C>
Chris@16:   C
Chris@16:   operator()(A a, B b, C c) const
Chris@16:   { return ::std::accumulate(a, b, c); }
Chris@16: 
Chris@16:   template <class A, class B, class C, class D>
Chris@16:   C
Chris@16:   operator()(A a, B b, C c, D d) const
Chris@16:   { return ::std::accumulate(a, b, c, d); }
Chris@16: };
Chris@16: 
Chris@16: // inner_product ---------------------------------
Chris@16: 
Chris@16: struct inner_product {
Chris@16:   
Chris@16:   template <class Args>
Chris@16:   struct sig { 
Chris@16:     typedef typename boost::remove_const<
Chris@16:         typename boost::tuples::element<4, Args>::type 
Chris@16:      >::type type; 
Chris@16:   };
Chris@16: 
Chris@16:   template <class A, class B, class C, class D>
Chris@16:   D
Chris@16:   operator()(A a, B b, C c, D d) const
Chris@16:   { return ::std::inner_product(a, b, c, d); }
Chris@16: 
Chris@16:   template <class A, class B, class C, class D, class E, class F>
Chris@16:   D
Chris@16:   operator()(A a, B b, C c, D d, E e, F f) const
Chris@16:   { return ::std::inner_product(a, b, c, d, e, f); }
Chris@16: };
Chris@16: 
Chris@16: 
Chris@16: // partial_sum ---------------------------------
Chris@16: 
Chris@16: struct partial_sum {
Chris@16:   
Chris@16:   template <class Args>
Chris@16:   struct sig { 
Chris@16:     typedef typename boost::remove_const<
Chris@16:         typename boost::tuples::element<3, Args>::type 
Chris@16:      >::type type; 
Chris@16:   };
Chris@16: 
Chris@16:   template <class A, class B, class C>
Chris@16:   C
Chris@16:   operator()(A a, B b, C c) const
Chris@16:   { return ::std::partial_sum(a, b, c); }
Chris@16: 
Chris@16:   template <class A, class B, class C, class D>
Chris@16:   C
Chris@16:   operator()(A a, B b, C c, D d) const
Chris@16:   { return ::std::partial_sum(a, b, c, d); }
Chris@16: };
Chris@16: 
Chris@16: // adjacent_difference ---------------------------------
Chris@16: 
Chris@16: struct adjacent_difference {
Chris@16:   
Chris@16:   template <class Args>
Chris@16:   struct sig { 
Chris@16:     typedef typename boost::remove_const<
Chris@16:         typename boost::tuples::element<3, Args>::type 
Chris@16:      >::type type; 
Chris@16:   };
Chris@16: 
Chris@16:   template <class A, class B, class C>
Chris@16:   C
Chris@16:   operator()(A a, B b, C c) const
Chris@16:   { return ::std::adjacent_difference(a, b, c); }
Chris@16: 
Chris@16:   template <class A, class B, class C, class D>
Chris@16:   C
Chris@16:   operator()(A a, B b, C c, D d) const
Chris@16:   { return ::std::adjacent_difference(a, b, c, d); }
Chris@16: };
Chris@16: 
Chris@16: } // end of ll namespace
Chris@16: 
Chris@16: } // end of lambda namespace
Chris@16: } // end of boost namespace
Chris@16: 
Chris@16: 
Chris@16: 
Chris@16: #endif