Return TRUE when a language model is set up

Return TRUE when a language model is set up

Usage

morie_llm_agent_available()

Value

Logical scalar.

Examples

old <- Sys.getenv(c("OLLAMA_HOST", "XDG_CONFIG_HOME"), unset = NA)
Sys.setenv(OLLAMA_HOST = "off", XDG_CONFIG_HOME = tempfile())
morie_llm_agent_available()
#> [1] FALSE
for (v in names(old)) if (is.na(old[[v]])) Sys.unsetenv(v) else do.call(Sys.setenv, as.list(old[v]))