Function to calculate the well function of the Papadopulos-Cooper solution that describe the drawdown variations for large diameter wells

papadopulos_cooper_well_function(td, par)

Arguments

td

Dimensionless time

par

List with the \(cd\) and \(\rho\) parameters. The well storage (\(cd\) parameter) is defined as $$cd = \frac{r_{w}^{2} S}{r_{c}^{2}}$$ where \(r_{w}\) is the radius of the well, \(r_{c}\) is the radius of the casing, and \(S\) is the storage coefficient. The dimensionless radius (\(\rho\) parameter) is defined as: $$\rho=\frac{r}{r_{w}}$$ where \(r\) is the distance to the observation well, and \(r_{w}\) is the radius of the well.

Value

The value of the well function for the Papadopulos-Cooper model

References

Papadopulos, I. S. & Cooper, H. H. Drawdown in a well of large diameter. Water Resources Research, 1967, 3, 241-244.

See also

Examples

td <- logseq(-2,4,30) par <- list(cd = 0.1, rho = 0.1) res <- papadopulos_cooper_well_function(td, par)