Subject: [Boost-commit] svn:boost r51578 - trunk/boost/math/distributions/detail
From: john_at_[hidden]
Date: 2009-03-03 13:18:18
Author: johnmaddock
Date: 2009-03-03 13:18:17 EST (Tue, 03 Mar 2009)
New Revision: 51578
URL: http://svn.boost.org/trac/boost/changeset/51578
Log:
Adjust fudge-factors yet again.
Text files modified:
trunk/boost/math/distributions/detail/hypergeometric_quantile.hpp | 4 ++--
1 files changed, 2 insertions(+), 2 deletions(-)
Modified: trunk/boost/math/distributions/detail/hypergeometric_quantile.hpp
==============================================================================
--- trunk/boost/math/distributions/detail/hypergeometric_quantile.hpp (original)
+++ trunk/boost/math/distributions/detail/hypergeometric_quantile.hpp 2009-03-03 13:18:17 EST (Tue, 03 Mar 2009)
@@ -110,7 +110,7 @@
T diff = result;
while(result < p)
{
- diff = (diff > tools::min_value<T>())
+ diff = (diff > tools::min_value<T>() * 8)
? T(n - x) * T(r - x) * diff / (T(x + 1) * T(N + x + 1 - n - r))
: hypergeometric_pdf<T>(x + 1, r, n, N, pol);
if(result + diff / 2 > p)
@@ -128,7 +128,7 @@
while(result + diff / 2 < q)
{
result += diff;
- diff = (diff > tools::min_value<T>())
+ diff = (diff > tools::min_value<T>() * 8)
? x * T(N + x - n - r) * diff / (T(1 + n - x) * T(1 + r - x))
: hypergeometric_pdf<T>(x - 1, r, n, N, pol);
--x;