mirror of
https://github.com/boostorg/multiprecision.git
synced 2026-02-10 23:42:41 +00:00
125 lines
4.5 KiB
C++
125 lines
4.5 KiB
C++
///////////////////////////////////////////////////////////////
|
|
// Copyright Christopher Kormanyos 2002 - 2011.
|
|
// Copyright 2011 John Maddock. Distributed under the Boost
|
|
// Software License, Version 1.0. (See accompanying file
|
|
// LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_
|
|
//
|
|
// This work is based on an earlier work:
|
|
// "Algorithm 910: A Portable C++ Multiple-Precision System for Special-Function Calculations",
|
|
// in ACM TOMS, {VOL 37, ISSUE 4, (February 2011)} (C) ACM, 2011. http://doi.acm.org/10.1145/1916461.1916469
|
|
|
|
#ifdef _MSC_VER
|
|
# define _SCL_SECURE_NO_WARNINGS
|
|
#endif
|
|
|
|
#define BOOST_MATH_OVERFLOW_ERROR_POLICY ignore_error
|
|
#define BOOST_MATH_SMALL_CONSTANT(x) x
|
|
|
|
#if !defined(TEST_MPF_50) && !defined(TEST_BACKEND) && !defined(TEST_CPP_DEC_FLOAT) && !defined(TEST_MPFR_50)
|
|
# define TEST_MPF_50
|
|
# define TEST_MPFR_50
|
|
# define TEST_CPP_DEC_FLOAT
|
|
|
|
#ifdef _MSC_VER
|
|
#pragma message("CAUTION!!: No backend type specified so testing everything.... this will take some time!!")
|
|
#endif
|
|
#ifdef __GNUC__
|
|
#pragma warning "CAUTION!!: No backend type specified so testing everything.... this will take some time!!"
|
|
#endif
|
|
|
|
#endif
|
|
|
|
#if defined(TEST_MPF_50)
|
|
#include <boost/multiprecision/gmp.hpp>
|
|
#endif
|
|
#if defined(TEST_MPFR_50)
|
|
#include <boost/multiprecision/mpfr.hpp>
|
|
#endif
|
|
#ifdef TEST_BACKEND
|
|
#include <boost/multiprecision/concepts/mp_number_archetypes.hpp>
|
|
#endif
|
|
#ifdef TEST_CPP_DEC_FLOAT
|
|
#include <boost/multiprecision/cpp_dec_float.hpp>
|
|
#endif
|
|
|
|
#define SC_(x) BOOST_STRINGIZE(x)
|
|
|
|
#include <boost/math/special_functions/bessel.hpp>
|
|
#include "libs/math/test/test_bessel_k.hpp"
|
|
|
|
void expected_results()
|
|
{
|
|
//
|
|
// Define the max and mean errors expected for
|
|
// various compilers and platforms.
|
|
//
|
|
add_expected_result(
|
|
".*", // compiler
|
|
".*", // stdlib
|
|
".*", // platform
|
|
".*gmp.*", // test type(s)
|
|
".*", // test data group
|
|
".*", 2000, 1500); // test function
|
|
|
|
add_expected_result(
|
|
".*", // compiler
|
|
".*", // stdlib
|
|
".*", // platform
|
|
".*mpfr_float_backend<18>.*", // test type(s)
|
|
".*", // test data group
|
|
".*", 3000, 1000); // test function
|
|
add_expected_result(
|
|
".*", // compiler
|
|
".*", // stdlib
|
|
".*", // platform
|
|
".*", // test type(s)
|
|
".*large.*", // test data group
|
|
".*", 80, 50); // test function
|
|
add_expected_result(
|
|
".*", // compiler
|
|
".*", // stdlib
|
|
".*", // platform
|
|
".*", // test type(s)
|
|
".*", // test data group
|
|
".*", 50, 15); // test function
|
|
//
|
|
// Finish off by printing out the compiler/stdlib/platform names,
|
|
// we do this to make it easier to mark up expected error rates.
|
|
//
|
|
std::cout << "Tests run with " << BOOST_COMPILER << ", "
|
|
<< BOOST_STDLIB << ", " << BOOST_PLATFORM << std::endl;
|
|
}
|
|
|
|
|
|
int test_main(int, char* [])
|
|
{
|
|
using namespace boost::multiprecision;
|
|
expected_results();
|
|
//
|
|
// Test at:
|
|
// 18 decimal digits: tests 80-bit long double approximations
|
|
// 30 decimal digits: tests 128-bit long double approximations
|
|
// 35 decimal digits: tests arbitrary precision code
|
|
//
|
|
#ifdef TEST_MPF_50
|
|
// We have accuracy issues with gmp_float<18> - maybe in std::exp?? Disabled for now.
|
|
test_bessel(mp_number<gmp_float<18> >(), "mp_number<gmp_float<18> >");
|
|
test_bessel(mp_number<gmp_float<30> >(), "mp_number<gmp_float<30> >");
|
|
test_bessel(mp_number<gmp_float<35> >(), "mp_number<gmp_float<35> >");
|
|
#endif
|
|
#ifdef TEST_MPFR_50
|
|
test_bessel(mp_number<mpfr_float_backend<18> >(), "mp_number<mpfr_float_backend<18> >");
|
|
test_bessel(mp_number<mpfr_float_backend<30> >(), "mp_number<mpfr_float_backend<30> >");
|
|
test_bessel(mp_number<mpfr_float_backend<35> >(), "mp_number<mpfr_float_backend<35> >");
|
|
#endif
|
|
#ifdef TEST_CPP_DEC_FLOAT
|
|
test_bessel(mp_number<cpp_dec_float<18> >(), "mp_number<cpp_dec_float<18> >");
|
|
test_bessel(mp_number<cpp_dec_float<30> >(), "mp_number<cpp_dec_float<30> >");
|
|
test_bessel(mp_number<cpp_dec_float<35> >(), "mp_number<cpp_dec_float<35> >");
|
|
#endif
|
|
return 0;
|
|
}
|
|
|
|
|
|
|