# Limit threads to avoid CRAN NOTE about CPU time >> elapsed time
.ggmlr_old_threads <- ggml_get_n_threads()
ggml_set_n_threads(2L)

if (requireNamespace("RhpcBLASctl", quietly = TRUE)) {
  RhpcBLASctl::blas_set_num_threads(2L)
  RhpcBLASctl::omp_set_num_threads(2L)
}