sf_performance_bessel.cpp 1.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142
  1. ///////////////////////////////////////////////////////////////
  2. // Copyright 2011 John Maddock. Distributed under the Boost
  3. // Software License, Version 1.0. (See accompanying file
  4. // LICENSE_1_0.txt or copy at https://www.boost.org/LICENSE_1_0.txt
  5. #include "sf_performance.hpp"
  6. void bessel_tests_1();
  7. void bessel_tests_2();
  8. void bessel_tests_3();
  9. void bessel_tests_4();
  10. void bessel_tests_5();
  11. void bessel_tests_6();
  12. void bessel_tests()
  13. {
  14. //
  15. // 50 digits first:
  16. //
  17. std::cout << "Testing Bessel Functions at 50 digits....." << std::endl;
  18. #if defined(TEST_MPFR) || defined(TEST_MPFR_CLASS)
  19. mpfr_set_default_prec(50 * 1000L / 301L);
  20. #endif
  21. #ifdef TEST_MPREAL
  22. mpfr::mpreal::set_default_prec(50 * 1000L / 301L);
  23. #endif
  24. bessel_tests_1();
  25. bessel_tests_2();
  26. bessel_tests_3();
  27. //
  28. // Then 100 digits:
  29. //
  30. std::cout << "Testing Bessel Functions at 100 digits....." << std::endl;
  31. #if defined(TEST_MPFR) || defined(TEST_MPFR_CLASS)
  32. mpfr_set_default_prec(100 * 1000L / 301L);
  33. #endif
  34. bessel_tests_4();
  35. bessel_tests_5();
  36. bessel_tests_6();
  37. }