Removes $trimmed flags from model or specific elements.
Examples
# \donttest{
trimmed <- trim_model(example_models$energyRt$multimod, verbose = FALSE)
is_trimmed(trimmed)
#> [1] TRUE
# Untrim only variables and equations
partly <- untrim_model(trimmed, elements = c("variables", "equations"))
# Untrim everything
restored <- untrim_model(trimmed)
is_trimmed(restored)
#> [1] FALSE
# }
