Calculates the well function of the Warrent and Root model

warren_root_well_function(td, par)

Arguments

td

A numeric vector with dimensionless time

par

List with parameters sigma, interflow porosity (lambda) and Stehfest coefficients

Value

A numeric vector with the dimensionless drawdown

References

Warren, J. & Root, P. The Behavior of Naturally Fractured Reservoirs. Society of Petroleum Engineers Journal., 1963, 3.

See also

Examples

td <- logseq(-1, 4, 50) par <- list(sigma = 1, lambda = 1, coeffs = stehfest_coeffs(8)) W <- warren_root_well_function(td, par)