as_array_or_scalar.hpp

Go to the documentation of this file.

#ifndef STAN_MATH_PRIM_FUN_AS_ARRAY_OR_SCALAR_HPP
#define STAN_MATH_PRIM_FUN_AS_ARRAY_OR_SCALAR_HPP
 
#include <stan/math/prim/fun/Eigen.hpp>
#include <stan/math/prim/meta.hpp>
#include <vector>
 
namespace stan {
namespace math {
 
template <typename T, require_stan_scalar_t<T>* = nullptr>
inline T as_array_or_scalar(T&& v) {
  return std::forward<T>(v);
}
 
template <typename T, require_stan_scalar_t<T>* = nullptr>
inline T& as_array_or_scalar(T& v) {
  return v;
}
 
template <typename T, require_eigen_array_t<T>* = nullptr>
inline T as_array_or_scalar(T&& v) {
  return std::forward<T>(v);
}
 
template <typename T, typename = require_eigen_t<T>,
          require_not_eigen_array_t<T>* = nullptr>
inline auto as_array_or_scalar(T&& v) {
  return make_holder([](auto&& x) { return x.array(); }, std::forward<T>(v));
}
 
template <typename T, require_std_vector_t<T>* = nullptr,
          require_not_std_vector_t<value_type_t<T>>* = nullptr>
inline auto as_array_or_scalar(T&& v) {
  using arr_t = Eigen::Array<value_type_t<T>, Eigen::Dynamic, 1>;
  using T_map = Eigen::Map<const arr_t>;
  return make_holder(
      [](auto&& x) { return T_map(x.data(), x.size()).matrix().array(); },
      std::forward<T>(v));
}
 
template <typename T, require_std_vector_vt<is_std_vector, T>* = nullptr,
          require_std_vector_vt<is_stan_scalar, value_type_t<T>>* = nullptr>
inline auto as_array_or_scalar(T&& v) {
  Eigen::Array<scalar_type_t<T>, -1, -1> ret(v.size(), v[0].size());
  for (size_t i = 0; i < v.size(); ++i) {
    ret.row(i) = Eigen::Map<const Eigen::Array<scalar_type_t<T>, 1, -1>>(
        v[i].data(), v[i].size());
  }
  return ret;
}
 
}  // namespace math
}  // namespace stan
 
#endif