R/sigma_c.R

In ratral/hyd4gpv: General Purpose Valve functions

#' @title Constant Cavitation.
#'
#' @description An early level of cavitation characterized by mild,
#' steady popping or crackling sounds that may be audible or detected by
#' vibration measurements. It is the next higher inflection point on the
#' cavitation profile above the point of incipient cavitation.
#'  - More regular cavitation events
#'  - Lower frequency sound and vibration sensed: “rumbling” sound
#'  - Some damage to surfaces may occur: dependent upon valve and trim styles, and materials.
#'
#' @param fls liquid pressure recovery full open (max between fl and Flp/Fp)
#' @param x valve position
#' @param b steepness
#' @param d upper value
#' @param e the effective dose
#'
#' @return Sigma_c
#' @export
#'
sigma_c <- function(x, b, d, e, fls){
  kc <- 0.81
  kv_kvs <- drm_LL3(x, b, d, e)
  return( (1/(kc * fls^2) - 1) * kv_kvs)
}