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

Sys.setenv(
  OMP_THREAD_LIMIT     = "2",
  OMP_NUM_THREADS      = "2",
  OMP_DYNAMIC          = "FALSE",
  OPENBLAS_NUM_THREADS = "2",
  MKL_NUM_THREADS      = "2"
)