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(T1&& a, T2&& b) {
  return apply_scalar_binary(
      [](auto&& c, auto&& d) {
        return modified_bessel_first_kind(std::forward<decltype(c)>(c),
                                          std::forward<decltype(d)>(d));
      },
      std::forward<T1>(a), std::forward<T2>(b));
}
 
}  // namespace math
}  // namespace stan
 
#endif