test_ncbeta_hooks.hpp 1.0 KB

123456789101112131415161718192021222324252627282930313233343536373839
  1. // (C) Copyright John Maddock 2008.
  2. // Use, modification and distribution are subject to the
  3. // Boost Software License, Version 1.0. (See accompanying file
  4. // LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
  5. #ifndef BOOST_MATH_TEST_NCBETA_OTHER_HOOKS_HPP
  6. #define BOOST_MATH_TEST_NCBETA_OTHER_HOOKS_HPP
  7. #ifdef TEST_R
  8. #define MATHLIB_STANDALONE
  9. #include <rmath.h>
  10. namespace other{
  11. inline float ncbeta_cdf(float a, float b, float nc, float x)
  12. {
  13. return (float)pnbeta(x, a, b, nc, 1, 0);
  14. }
  15. inline double ncbeta_cdf(double a, double b, double nc, double x)
  16. {
  17. return pnbeta(x, a, b, nc, 1, 0);
  18. }
  19. inline long double ncbeta_cdf(long double a, long double b, long double nc, long double x)
  20. {
  21. return pnbeta((double)x, (double)a, (double)b, (double)nc, 1, 0);
  22. }
  23. }
  24. #define TEST_OTHER
  25. #endif
  26. #ifdef TEST_OTHER
  27. namespace other{
  28. boost::math::concepts::real_concept ncbeta_cdf(boost::math::concepts::real_concept, boost::math::concepts::real_concept, boost::math::concepts::real_concept){ return 0; }
  29. }
  30. #endif
  31. #endif