cooper_well_function

Source: R/cooper_utilities.R

Function to calculate the well function of the cooper solution for slug test

cooper_well_function(td, par)

Arguments

td

Numeric vector with dimensionless time
par

List with the stehfest coefficients and cd (dimensionless storage coefficient)

Value

A numeric vector with the value of the Cooper well function, that is, the dimensionless drawdown

References

Cooper, H. H.; Bredehoeft, J. D. & Papadopulos, I. S. Response of a finite-diameter well to an instantaneous charge of water Water Resources Research, 1967, 3, 263-269

See also

Other cooper functions: cooper_WF_LT, cooper_calculate_parameters, cooper_solution_dlogt, cooper_solution_initial, cooper_solution

Examples

td <- logseq(-2, 4, 50)
par <- list(cd = 1, rw = 1)
res <- cooper_well_function(td, par)