Calculates the well function of the Warrent and Root model
warren_root_well_function(td, par)
td | A numeric vector with dimensionless time |
---|---|
par | List with parameters sigma, interflow porosity (lambda) and Stehfest coefficients |
A numeric vector with the dimensionless drawdown
Warren, J. & Root, P. The Behavior of Naturally Fractured Reservoirs. Society of Petroleum Engineers Journal., 1963, 3.
Other warren_root functions: warren_root_WF_LT
,
warren_root_solution_dlogt
,
warren_root_solution_initial
,
warren_root_solution
td <- logseq(-1, 4, 50) par <- list(sigma = 1, lambda = 1, coeffs = stehfest_coeffs(8)) W <- warren_root_well_function(td, par)