neuzil_calculate_parameters

Source: R/neuzil_utilities.R

Function to calculate the hydraulic parameters for the Neuzil solution

neuzil_calculate_parameters(ptest, par, hydraulic = TRUE)

Arguments

ptest

A pumping_test object
par

A list with the wellbore storage coefficient (cd) and t0 parameters
hydraulic

Logical flag to indicate if hydraulic parameters are calculated. If False, the the statistcal parameter (a and t0) are calculated.

Value

A list with

  • Tr: Transmissivity

  • Ss: Storage coefficient

  • radius_influence

References

Neuzil, C. E. On conducting the modified 'Slug' test in tight formations. Water Resources Research, 1982, 18, 2, 439-441

See also

Other neuzil functions: neuzil_WF_LT, neuzil_solution_dlogt, neuzil_solution_initial, neuzil_solution, neuzil_well_function

Examples

data(neuzil)
ptest.neuzil <- pumping_test("Well1", Q = 0, r = 0.0, t = neuzil$t, s = neuzil$s)
par <- list(rw = 0.067, ceff = 2.723e-9, vs = 1.59)
ptest.neuzil$additional_parameters <- par
sol0 <- neuzil_solution_initial(ptest.neuzil)
neuzil.par <- neuzil_calculate_parameters(ptest.neuzil, sol0)
print(neuzil.par)
#> $Tr
#> [1] 2.941765e-09
#> 
#> $Ss
#> [1] 3.008648e-05
#> 
#> $radius_influence
#>           [,1]
#> [1,] 0.1615661
#>