Calculates the value of the initial parameters of a constant head test using the Jacob-Lohman solution (Discharge)

jacob_lohman_G_solution_initial(ptest)

Arguments

ptest

A pumping_test object

Value

A list with the values of

  • 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

References

Jacob, C. E. & Lohman, S. W. Nonsteady Flow to a Well Of Constant Drawdown. American Geophysical Union, 1952, 33, 10.

See also

Examples

data(jacob_lohman) s <- vector("numeric", length(jacob_lohman$t)) s[1:length(jacob_lohman$t)] <- 0 ptest <- pumping_test("Well1", Q = jacob_lohman$q, r = 0.0, t = jacob_lohman$t, s = s)
#> Warning: the condition has length > 1 and only the first element will be used
sol0 <- jacob_lohman_G_solution_initial(ptest) print(sol0)
#> $a #> [1] 443.0971 #> #> $t0 #> [1] 60 #>