boost/math
2
0
Fork 0
mirror of https://github.com/boostorg/math.git synced 2026-01-19 04:22:09 +00:00
Code Issues Projects Releases Wiki Activity

Added some more descriptive information to error messages.

Browse Source 
[SVN r39667]
This commit is contained in:
John Maddock
2007-10-03 09:32:35 +00:00
parent cb7328e706
commit 899f4fbfd1
3 changed files with 8 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
include/boost/math/special_functions/beta.hpp
View File

@@ -478,7 +478,7 @@ T ibeta_series(T a, T b, T x, T s0, const L&, bool normalised, T* p_derivative,
ibeta_series_t<T> s(a, b, x, result);
boost::uintmax_t max_iter = policies::get_max_series_iterations<Policy>();
result = boost::math::tools::sum_series(s, boost::math::policies::digits<T, Policy>(), max_iter, s0);
policies::check_series_iterations("boost::math::ibeta<%1%>(%1%, %1%, %1%)", max_iter, pol);
policies::check_series_iterations("boost::math::ibeta<%1%>(%1%, %1%, %1%) in ibeta_series (with lanczos)", max_iter, pol);
return result;
}
//
@@ -558,7 +558,7 @@ T ibeta_series(T a, T b, T x, T s0, const boost::math::lanczos::undefined_lanczo
ibeta_series_t<T> s(a, b, x, result);
boost::uintmax_t max_iter = policies::get_max_series_iterations<Policy>();
result = boost::math::tools::sum_series(s, boost::math::policies::digits<T, Policy>(), max_iter, s0);
policies::check_series_iterations("boost::math::ibeta<%1%>(%1%, %1%, %1%)", max_iter, pol);
policies::check_series_iterations("boost::math::ibeta<%1%>(%1%, %1%, %1%) in ibeta_series (without lanczos)", max_iter, pol);
return result;
}

6
include/boost/math/special_functions/detail/bessel_ik.hpp
View File

@@ -76,7 +76,7 @@ int temme_ik(T v, T x, T* K, T* K1, const Policy& pol)
break;
}
}
policies::check_series_iterations("boost::math::bessel_ik<%1%>(%1%,%1%)", k, pol);
policies::check_series_iterations("boost::math::bessel_ik<%1%>(%1%,%1%) in temme_ik", k, pol);
*K = sum;
*K1 = 2 * sum1 / x;
@@ -123,7 +123,7 @@ int CF1_ik(T v, T x, T* fv, const Policy& pol)
}
}
BOOST_MATH_INSTRUMENT_VARIABLE(k);
policies::check_series_iterations("boost::math::bessel_ik<%1%>(%1%,%1%)", k, pol);
policies::check_series_iterations("boost::math::bessel_ik<%1%>(%1%,%1%) in CF1_ik", k, pol);
*fv = f;
@@ -188,7 +188,7 @@ int CF2_ik(T v, T x, T* Kv, T* Kv1, const Policy& pol)
break;
}
}
policies::check_series_iterations("boost::math::bessel_ik<%1%>(%1%,%1%)", k, pol);
policies::check_series_iterations("boost::math::bessel_ik<%1%>(%1%,%1%) in CF2_ik", k, pol);
*Kv = sqrt(pi<T>() / (2 * x)) * exp(-x) / S;
*Kv1 = *Kv * (0.5f + v + x + (v * v - 0.25f) * f) / x;

6
include/boost/math/special_functions/detail/bessel_jy.hpp
View File

@@ -88,7 +88,7 @@ int temme_jy(T v, T x, T* Y, T* Y1, const Policy& pol)
break;
}
}
policies::check_series_iterations("boost::math::bessel_jy<%1%>(%1%,%1%)", k, pol);
policies::check_series_iterations("boost::math::bessel_jy<%1%>(%1%,%1%) in temme_jy", k, pol);
*Y = -sum;
*Y1 = -2 * sum1 / x;
@@ -130,7 +130,7 @@ int CF1_jy(T v, T x, T* fv, int* sign, const Policy& pol)
if (abs(delta - 1.0L) < tolerance)
{ break; }
}
policies::check_series_iterations("boost::math::bessel_jy<%1%>(%1%,%1%)", k / 100, pol);
policies::check_series_iterations("boost::math::bessel_jy<%1%>(%1%,%1%) in CF1_jy", k / 100, pol);
*fv = -f;
*sign = s; // sign of denominator
@@ -184,7 +184,7 @@ int CF2_jy(T v, T x, T* p, T* q, const Policy& pol)
f *= delta;
if (abs(delta - one) < tolerance) { break; }
}
policies::check_series_iterations("boost::math::bessel_jy<%1%>(%1%,%1%)", k, pol);
policies::check_series_iterations("boost::math::bessel_jy<%1%>(%1%,%1%) in CF2_jy", k, pol);
*p = real(f);
*q = imag(f);