R/W_u_huisman.R

In ToonVanDaele/hydranalytic: A Collection of Some Analytic Hydrological Equations

#' W_u_Huisman
#'
#' @description Calculation of W(u) with the simple approximation (Huisman).
#'    reference www.grondwaterformules.nl - Huisman, 1972 p.115
#'    Don't use this approximation. Only useful for comparison
#' @param u u (-)
#' @export
#'
#' @return W_u W_u (-)

W_u_Huisman <- function(u) {

  W_u_Huisman <- log(0.562 / u)

  return(W_u_Huisman)
}