modified_bessel_first_kind.hpp

Go to the documentation of this file.

#ifndef STAN_MATH_PRIM_FUN_MODIFIED_BESSEL_FIRST_KIND_HPP
#define STAN_MATH_PRIM_FUN_MODIFIED_BESSEL_FIRST_KIND_HPP
 
#include <stan/math/prim/meta.hpp>
#include <stan/math/prim/err.hpp>
#include <stan/math/prim/functor/apply_scalar_binary.hpp>
#include <boost/math/special_functions/bessel.hpp>
 
namespace stan {
namespace math {
 
template <typename T2, require_arithmetic_t<T2>* = nullptr>
inline T2 modified_bessel_first_kind(int v, const T2 z) {
  check_not_nan("modified_bessel_first_kind", "z", z);
 
  return boost::math::cyl_bessel_i(v, z);
}
 
inline double modified_bessel_first_kind(int v, int z) {
  check_not_nan("modified_bessel_first_kind", "z", z);
 
  return boost::math::cyl_bessel_i(v, static_cast<double>(z));
}
 
template <typename T1, typename T2, require_any_container_t<T1, T2>* = nullptr>
inline auto modified_bessel_first_kind(const T1& a, const T2& b) {
  return apply_scalar_binary(a, b, [&](const auto& c, const auto& d) {
    return modified_bessel_first_kind(c, d);
  });
}
 
}  // namespace math
}  // namespace stan
 
#endif