This function calculates the derivative of the drawdown with respect to the derivative of the log of time

general_radial_flow_solution_dlogt(ptest, a, t0, n, 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

n

Flow dimension

t

Numeric vector with time

Value

A numeric vector with the derivative of drawdown

References

Barker, J. A. A generalized radial flow model for hydraulic tests in fractured rock Water Resources Research, 1988, 24, 1796-1804.

See also

Examples

data("general_radial_flow1") ptest.grf1 <- pumping_test("Well1", Q= 0.02322, r = 26.2, t = general_radial_flow1$t, s = general_radial_flow1$s) par <- list(rw = 0.1, rc = 0.1, rd = 1) ptest.grf1$additional_parameters <- par sol0 <- general_radial_flow_solution_initial(ptest.grf1) sol_dlogt <- general_radial_flow_solution_dlogt(ptest.grf1, sol0$a, sol0$t0, sol0$n, ptest.grf1$t) print(sol_dlogt)
#> [1] 4.695853e-06 5.833816e-03 3.221374e-02 6.557214e-02 9.740509e-02 #> [6] 1.284039e-01 1.482328e-01 1.640528e-01 1.814581e-01 1.957996e-01 #> [11] 2.087736e-01 2.208857e-01 2.317955e-01 2.413054e-01 2.495513e-01 #> [16] 2.552862e-01 2.594581e-01 2.637534e-01 2.688993e-01 2.737290e-01 #> [21] 2.777938e-01 2.817494e-01 2.853376e-01 2.882547e-01 2.909114e-01 #> [26] 2.932330e-01 2.952565e-01 2.970405e-01 2.986955e-01 3.005031e-01 #> [31] 3.022812e-01 3.039190e-01 3.054530e-01 3.069340e-01 3.082178e-01 #> [36] 3.094450e-01 3.107373e-01 3.118759e-01 3.129153e-01 3.138778e-01 #> [41] 3.149631e-01 3.159132e-01 3.166169e-01 3.172130e-01 3.178529e-01 #> [46] 3.185685e-01 3.192843e-01 3.199657e-01 3.206420e-01 3.212640e-01 #> [51] 3.217771e-01 3.221952e-01 3.225952e-01 3.230556e-01 3.235665e-01 #> [56] 3.239782e-01