R/hydraulicCutOff.R

Defines functions hydraulicCutOff

Documented in hydraulicCutOff

hydraulicCutOff <- 
function(theta_R, k0, k1, n, x0 = 6.653)
{
    exp((1/n) * log(-k0 / (log(exp(-k0/x0^n) - theta_R/k1))))
}

Try the soilphysics package in your browser

Any scripts or data that you put into this service are public.

soilphysics documentation built on June 7, 2022, 5:06 p.m.