check_triangular.hpp

Go to the documentation of this file.

#ifndef STAN_MATH_OPENCL_ERR_CHECK_TRIANGULAR_HPP
#define STAN_MATH_OPENCL_ERR_CHECK_TRIANGULAR_HPP
#ifdef STAN_OPENCL
 
#include <stan/math/prim/err/invalid_argument.hpp>
#include <stan/math/opencl/matrix_cl_view.hpp>
#include <stan/math/opencl/matrix_cl.hpp>
namespace stan {
namespace math {
 
template <typename T, require_matrix_cl_t<T>* = nullptr>
inline void check_triangular(const char* function, const char* name,
                             const T& A) {
  if (A.view() != matrix_cl_view::Lower && A.view() != matrix_cl_view::Upper) {
    invalid_argument("tri_inverse(OpenCL)", "A.view()",
                     static_cast<int>(A.view()), "is ",
                     ". Only triangular input matrices are supported!");
  }
}
 
}  // namespace math
}  // namespace stan
 
#endif
#endif