hantush_jacob_solution: hantush_jacob_solution

Description Usage Arguments Value Author(s) References See Also Examples

View source: R/hantush_jacob_utilities.R

Description

Function to calculate the drawdown of a Hantush-Jacob model

Usage

1
hantush_jacob_solution(ptest, a, t0, lambda, t)

Arguments

ptest

A pumping_test object

a

Slope of the straight line fitted to the drawdown data using the Cooper-Jacob approach

t0

Intercept of the straight line fitted to the drawdown data using the Cooper-Jacob approach

lambda

Leakage factor defined as

λ = √{\frac{b^{'}T}{k_{h}^{'}}}

where b^{'} and k_{h}^{'} are the thickness and the vertical hydraulic conductivity of the aquitard, and T is the transmissivity of the underlying aquifer.

t

Numeric vector with the time values

Value

A numeric vector with the calculated drawdown

Author(s)

Oscar Garcia-Cabrejo khaors@gmail.com

References

Hantush, M. S. Flow to wells in aquifers separated by a semipervious layer. Journal of Geophysical Research, 1967, 72, 1709.

See Also

Other hantush_jacob functions: hantush_jacob_WF_LT_dlogt, hantush_jacob_WF_LT, hantush_jacob_calculate_parameters, hantush_jacob_solution_dlogt, hantush_jacob_solution_initial, hantush_jacob_well_function

Examples

1
2
3
4
5
6
data(hantush_jacob)
ptest <- pumping_test('Well1', Q = 6.309e-3, r = 3.048, t=hantush_jacob$t, s = hantush_jacob$s)
ptest$additional_parameters$B <- 6.096
sol0 <- hantush_jacob_solution_initial(ptest)
sol <- hantush_jacob_solution(ptest,sol0$a, sol0$t0, sol0$lambda, ptest$t)
print(sol)

khaors/pumpingtest documentation built on Nov. 15, 2019, 8:10 p.m.