R/rSOILWAT2-defunct.R

In Burke-Lauenroth-Lab/rSOILWAT2: An Ecohydrological Ecosystem-Scale Water Balance Simulation Model

#' Defunct functions in package \pkg{rSOILWAT2}
#'
#' Executing a defunct function will fail and tell you which function
#' replaces them.
#'
#' @param ... Function arguments. Unused since functions are defunct.
#'
#' @name rSOILWAT2-defunct
NULL


#' @rdname rSOILWAT2-defunct
#' @export
SMR_names <- function(...) {
  .Defunct(
    new = "SMR_names",
    package = "rSW2funs",
    msg = paste(
      "`rSOILWAT2::SMR_names()`",
      "is defunct since version 4.0.2;",
      "please use",
      "`rSW2funs::SMR_names()`",
      "instead."
    )
  )
}

#' @rdname rSOILWAT2-defunct
#' @export
SMRq_names <- function(...) {
  .Defunct(
    new = "SMRq_names",
    package = "rSW2funs",
    msg = paste(
      "`rSOILWAT2::SMRq_names()`",
      "is defunct since version 4.0.2;",
      "please use",
      "`rSW2funs::SMRq_names()`",
      "instead."
    )
  )
}

#' @rdname rSOILWAT2-defunct
#' @export
STR_names <- function(...) {
  .Defunct(
    new = "STR_names",
    package = "rSW2funs",
    msg = paste(
      "`rSOILWAT2::STR_names()`",
      "is defunct since version 4.0.2;",
      "please use",
      "`rSW2funs::STR_names()`",
      "instead."
    )
  )
}

#' @rdname rSOILWAT2-defunct
#' @export
calc_RRs_Chambers2014 <- function(...) {
  .Defunct(
    new = "calc_RRs_Chambers2014",
    package = "rSW2funs",
    msg = paste(
      "`rSOILWAT2::calc_RRs_Chambers2014()`",
      "is defunct since version 4.0.2;",
      "please use",
      "`rSW2funs::calc_RRs_Chambers2014()`",
      "instead."
    )
  )
}

#' @rdname rSOILWAT2-defunct
#' @export
calc_RRs_Maestas2016 <- function(...) {
  .Defunct(
    new = "calc_RRs_Maestas2016",
    package = "rSW2funs",
    msg = paste(
      "`rSOILWAT2::calc_RRs_Maestas2016()`",
      "is defunct since version 4.0.2;",
      "please use",
      "`rSW2funs::calc_RRs_Maestas2016()`",
      "instead."
    )
  )
}

#' @rdname rSOILWAT2-defunct
#' @export
calc_SMTRs <- function(...) {
  .Defunct(
    new = "calc_SMTRs",
    package = "rSW2funs",
    msg = paste(
      "`rSOILWAT2::calc_SMTRs()`",
      "is defunct since version 4.0.2;",
      "please use",
      "`rSW2funs::calc_SMTRs()`",
      "instead."
    )
  )
}

#' @rdname rSOILWAT2-defunct
#' @export
getStartYear <- function(...) {
  .Defunct(
    new = "getStartYear",
    package = "rSW2data",
    msg = paste(
      "`rSOILWAT2::getStartYear()`",
      "is defunct since version 4.0.2;",
      "please use",
      "`rSW2data::getStartYear()`",
      "instead."
    )
  )
}

#' @rdname rSOILWAT2-defunct
#' @export
setup_time_simulation_run <- function(...) {
  .Defunct(
    new = "setup_time_simulation_run",
    package = "rSW2data",
    msg = paste(
      "`rSOILWAT2::setup_time_simulation_run()`",
      "is defunct since version 4.0.2;",
      "please use",
      "`rSW2data::setup_time_simulation_run()`",
      "instead."
    )
  )
}

#' @rdname rSOILWAT2-defunct
#' @export
simTiming_ForEachUsedTimeUnit <- function(...) {
  .Defunct(
    new = "simTiming_ForEachUsedTimeUnit",
    package = "rSW2data",
    msg = paste(
      "`rSOILWAT2::simTiming_ForEachUsedTimeUnit()`",
      "is defunct since version 4.0.2;",
      "please use",
      "`rSW2data::simTiming_ForEachUsedTimeUnit()`",
      "instead."
    )
  )
}

#' @rdname rSOILWAT2-defunct
#' @export
update_requested_years <- function(...) {
  .Defunct(
    new = "update_requested_years",
    package = "rSW2data",
    msg = paste(
      "`rSOILWAT2::update_requested_years()`",
      "is defunct since version 4.0.2;",
      "please use",
      "`rSW2data::update_requested_years()`",
      "instead."
    )
  )
}