Get the model directory for a given AEME and model.

Usage

get_model_dir(aeme, model, path)

Arguments

aeme: Aeme object.
model: character vector; models to use. One or more of "dy_cd", "glm_aed", "gotm_wet", "simstrat_aed2". Defaults to all models if not found in aeme.
path: character; directory where input files are located. Defaults to the path stored in aeme, or the current working directory if not set.

Value

Path to the model directory

Examples

aeme_file <- system.file("extdata/aeme.rds", package = "AEME")
aeme <- readRDS(aeme_file)
path <- tempdir()
model <- c("glm_aed")
aeme <- build_aeme(aeme = aeme, model = model, path = path, ext_elev = 3)
#> Warning: ! `SIL_rsi`: SIL_rsi is constant across all rows -- this may be a placeholder
#>   value.
#> ℹ Check raw data or unit conversion for this variable.
#> 
#> ── Calculating water balance ──
#> 
#> Resolving water level
#>   ℹ Using observed water level
#> ! Missing values in observed water level
#> ℹ Estimating surface water temperature
#> ✔ Estimating surface water temperature [25ms]
#> 
#> Estimating lake water levels for glm_aed
#>   ℹ Optimizing parameters for water balance
#>   ✔ Optimization Complete: C = 0.341, h_inv = 23.478, Final RMSE = 0.1456
#> ℹ Correcting water balance using estimated outflows (method = 2).
#> 
#> ── Building GLM-AED for lake wainamu ──
#> 
#> ✔ GLM nml validation completed - no issues detected.
lake_dir <- get_lake_dir(aeme)
model_dir <- get_model_dir(aeme)