| // (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) |
| // |
| // This file is machine generated, do not edit by hand |
| |
| // Polynomial evaluation using second order Horners rule |
| #ifndef BOOST_MATH_TOOLS_RAT_EVAL_5_HPP |
| #define BOOST_MATH_TOOLS_RAT_EVAL_5_HPP |
| |
| namespace boost{ namespace math{ namespace tools{ namespace detail{ |
| |
| template <class T, class U, class V> |
| inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*) |
| { |
| return static_cast<V>(0); |
| } |
| |
| template <class T, class U, class V> |
| inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<1>*) |
| { |
| return static_cast<V>(a[0]) / static_cast<V>(b[0]); |
| } |
| |
| template <class T, class U, class V> |
| inline V evaluate_rational_c_imp(const T* a, const U* b, const V& x, const mpl::int_<2>*) |
| { |
| return static_cast<V>((a[1] * x + a[0]) / (b[1] * x + b[0])); |
| } |
| |
| template <class T, class U, class V> |
| inline V evaluate_rational_c_imp(const T* a, const U* b, const V& x, const mpl::int_<3>*) |
| { |
| return static_cast<V>(((a[2] * x + a[1]) * x + a[0]) / ((b[2] * x + b[1]) * x + b[0])); |
| } |
| |
| template <class T, class U, class V> |
| inline V evaluate_rational_c_imp(const T* a, const U* b, const V& x, const mpl::int_<4>*) |
| { |
| return static_cast<V>((((a[3] * x + a[2]) * x + a[1]) * x + a[0]) / (((b[3] * x + b[2]) * x + b[1]) * x + b[0])); |
| } |
| |
| template <class T, class U, class V> |
| inline V evaluate_rational_c_imp(const T* a, const U* b, const V& x, const mpl::int_<5>*) |
| { |
| if(x <= 1) |
| { |
| V x2 = x * x; |
| return static_cast<V>(((a[4] * x2 + a[2]) * x2 + a[0] + (a[3] * x2 + a[1]) * x) / ((b[4] * x2 + b[2]) * x2 + b[0] + (b[3] * x2 + b[1]) * x)); |
| } |
| else |
| { |
| V z = 1 / x; |
| V z2 = 1 / (x * x); |
| return static_cast<V>(((a[0] * z2 + a[2]) * z2 + a[4] + (a[1] * z2 + a[3]) * z) / ((b[0] * z2 + b[2]) * z2 + b[4] + (b[1] * z2 + b[3]) * z)); |
| } |
| } |
| |
| |
| }}}} // namespaces |
| |
| #endif // include guard |
| |