1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556 |
- // (C) Copyright John Maddock 2006.
- // 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)
- #ifndef BOOST_MATH_TEST_ZETA_OTHER_HOOKS_HPP
- #define BOOST_MATH_TEST_ZETA_OTHER_HOOKS_HPP
- #ifdef TEST_CEPHES
- namespace other{
- extern "C" {
- double zetac(double);
- float zetacf(float);
- long double zetacl(long double);
- }
- inline float zeta(float a)
- { return 1 + zetac(a); }
- inline double zeta(double a)
- { return 1 + zetac(a); }
- inline long double zeta(long double a)
- {
- #ifdef BOOST_MSVC
- return 1 + zetac((double)a);
- #else
- return zetacl(a);
- #endif
- }
- }
- #define TEST_OTHER
- #endif
- #ifdef TEST_GSL
- #include <gsl/gsl_sf_zeta.h>
- namespace other{
- inline float zeta(float a)
- { return (float)gsl_sf_zeta(a); }
- inline double zeta(double a)
- { return gsl_sf_zeta(a); }
- inline long double zeta(long double a)
- { return gsl_sf_zeta(a); }
- }
- #define TEST_OTHER
- #endif
- #ifdef TEST_OTHER
- namespace other{
- boost::math::concepts::real_concept zeta(boost::math::concepts::real_concept){ return 0; }
- }
- #endif
- #endif
|