R/kv_value.R

In ratral/hyd4gpv: General Purpose Valve functions

#'
#' @title Flow coefficient Kv Value in function of the Zeta  Value
#' @description The valve flow coefficient Kv is defined as the number
#' of cubic meters per hour of 5°C to 30°C water that will flow through
#' a control valve at a specified position of the control valve (travel) h
#' with a differential pressure Delta P (p1-p2) of 1bar  (105 Pa)
#' across it.
#' @author Dr. Raúl Trujillo Álvarez
#' @param dn diameter in millimeter (mm)
#' @param zeta dimensionless quantity
#' @return kv Flow coefficient in m³/h
#' @export
#' @examples
#' kv_value( dn = 500, zeta = 1.9)
kv_value <- function(dn, zeta){
  kv <- ((dn)^2)/sqrt(626.3*zeta)
  return(kv)
}