Calculates the initial values of parameters of Neuzil solution
neuzil_solution_initial(ptest)
ptest | A pumping_test object |
---|
A list with
cd: Wellbore storage coefficient
t0: Intercept
Neuzil, C. E. On conducting the modified 'Slug' test in tight formations. Water Resources Research, 1982, 18, 2, 439-441
Other neuzil functions: neuzil_WF_LT
,
neuzil_calculate_parameters
,
neuzil_solution_dlogt
,
neuzil_solution
,
neuzil_well_function
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) print(sol0)#> $cd #> [1] 50 #> #> $t0 #> [1] 2295.53 #>