These functions read and write to the environment where the package stores information about model specifications.
get_model_env()
get_from_env(items)
set_env_val(name, value)The modelenv environment
if (FALSE) {
# Access the model data:
current_code <- get_model_env()
ls(envir = current_code)
get_from_env("models")
get_from_env("modes")
get_from_env("example")
set_env_val("example", 4)
get_from_env("example")
}