R/model.dir.R

In ices-tools-prod/TAF: Transparent Assessment Framework for Reproducible Research

Defines functions model.dir

Documented in model.dir

#' @rdname TAF-internal
#'
#' @export

## Model directory name

model.dir <- function()
{
  if(!dir.exists("model") && dir.exists("method"))
    "method"
  else
    "model"
}