induce_infiltration_time: Calculate the critical time at which stream transitions from...

Description Usage Arguments Details Value References Examples

View source: R/induce_infiltration_time.R

Description

Calculate the critical time at which stream transitions from gaining to losing.

Usage

1
induce_infiltration_time(d, S, Tr, Qa, Qw)

Arguments

d

distance from well to stream [L]

S

aquifer storage coefficient (specific yield if unconfined; storativity if confined)

Tr

aquifer transmissivity [L2/T]

Qa

ambient groundwater inflow rate per unit length of stream [L2/T]

Qw

well pumping rate [L3/T]

Details

This calculates the critical time at which induced infiltration due to groundwater pumping begins, based on the glover model of streamflow depletion. Derived in Chen (2003) Eq. 4.

Assumptions:

Value

A numeric of tc, the critical time at which induced infiltration begins [T].

References

Chen, X (2003). Analysis of Pumping-Induced Stream-Aquifer Interactions for Gaining Streams. Journal of Hydrology 275(1): 1-11. doi:10.1016/S0022-1694(02)00320-7

Examples

1
2
3
4
# recreate Figure 2 in Chen (2003)
Qa <- c(0.0001, 0.0003, 0.0005, 0.0008, 0.001)
tc <- induce_infiltration_time(d = 575, S = 0.2, Tr = 100*15, Qa = Qa, Qw = 2727)
plot(x = (pi * Qa * 100 * 15 * 575 / 2727), y = tc, log = "y")

streamDepletr documentation built on March 26, 2020, 7:27 p.m.