Influence of a Fault on Steady-State Groundwater Flow
 | Download
this example as a
Mathematica
notebook. |
William C. Haneberg
bill@haneberg.com
http://www.haneberg.com
Introduction
This example uses analytical solutions from Haneberg ("Steady-State Groundwater
Flow across Idealized Faults," Water Resources Research 31, 1815-1820, 1995)
to calculate the influence of an idealized vertical fault on steady-state horizontal
groundwater flow. The solutions are derived by specifying general solutions to the
1D steady-state flow equation for each of three subdomains (right-hand aquifer,
fault, and left-hand aquifer). Constants of integration were eliminated by specifying
head at the left and right boundaries, and then requiring continuity of head and flux
across each of the two internal boundaries. Solution derivations are included at the
end of this notebook.
All variables are dimensionless. The horizontal axis
shows distance from the fault (normalized to the problem domain width), and the
vertical axis shows normalized hydraulic head changed (normalized to the total
head drop across the problem domain).
Evaluate the FaultFlowPlot Function
Syntax is FaultFlowPlot[TL, TR, Lf], where TL is the
transmissivity of the left-hand aquifer relative to that of the fault,
TR is the transmissivity of the right-hand aquifer relative to
that of the fault, and Lf is the width of the fault relative to
the total width of the problem domain.
![[Graphics:Images/index_gr_1.gif]](Images/index_gr_1.gif)
Create a Plot
In this case, the left-hand aquifer transmissivity is 10 times that of the fault and the
right-hand aquifer transmissivity is 50 times that of the fault. The width of the fault
relative to the problem domain is 0.05. The solid line shows the calculated hydraulic
head profile across the fault, and the dashed line shows the unperturbed hydraulic
gradient that would have existed without the fault. As discussed in Haneberg (1995),
this very simple model accounts exceptionally well for water-level changes observed
across faults in the Albuquerque basin.
![[Graphics:Images/index_gr_2.gif]](Images/index_gr_2.gif)
Now, add some explanatory information and a background to highlight the location of the fault.
![[Graphics:Images/index_gr_4.gif]](Images/index_gr_4.gif)
![[Graphics:Images/index_gr_5.gif]](Images/index_gr_5.gif)
Derivation of Fault Flow Solutions
From Haneberg, W.C. "Steady-State Groundwater Flow across Idealized
Faults," Water Resources Research 31 (1995) 1815-1820.
Define General Solutions
Define general solutions for heads in the left aquifer, fault, and right
aquifer in which c1, ..., c6 are the constants of
integration. The governing equation for steady-state 1D flow in each of
the three subdomains is . DSolve can also be used to solve the entire system of differential equations and boundary conditions, and it is included as an alternative at the end of this notebook.
![[Graphics:Images/index_gr_8.gif]](Images/index_gr_8.gif)
![[Graphics:Images/index_gr_9.gif]](Images/index_gr_9.gif)
![[Graphics:Images/index_gr_10.gif]](Images/index_gr_10.gif)
![[Graphics:Images/index_gr_11.gif]](Images/index_gr_11.gif)
![[Graphics:Images/index_gr_12.gif]](Images/index_gr_12.gif)
![[Graphics:Images/index_gr_13.gif]](Images/index_gr_13.gif)
Evaluate the Boundary Conditions
At the left and right boundaries x = +/-1/2. Head is
fixed at +/- one half of the total head drop, delta, across the system.
![[Graphics:Images/index_gr_14.gif]](Images/index_gr_14.gif)
![[Graphics:Images/index_gr_15.gif]](Images/index_gr_15.gif)
![[Graphics:Images/index_gr_16.gif]](Images/index_gr_16.gif)
![[Graphics:Images/index_gr_17.gif]](Images/index_gr_17.gif)
Evaluate the internal boundary conditions that link the aquifers to the
fault by requiring continuity of head and flux across the boundaries
(x = +/-Lf/2).
Flux is given in a vertically averaged form for 1D horizontal flow,
q = T (dh/dx), where T is transmissivity (hydraulic
conductivity times aquifer thickness).
![[Graphics:Images/index_gr_18.gif]](Images/index_gr_18.gif)
![[Graphics:Images/index_gr_19.gif]](Images/index_gr_19.gif)
![[Graphics:Images/index_gr_20.gif]](Images/index_gr_20.gif)
![[Graphics:Images/index_gr_21.gif]](Images/index_gr_21.gif)
![[Graphics:Images/index_gr_22.gif]](Images/index_gr_22.gif)
![[Graphics:Images/index_gr_23.gif]](Images/index_gr_23.gif)
![[Graphics:Images/index_gr_24.gif]](Images/index_gr_24.gif)
![[Graphics:Images/index_gr_25.gif]](Images/index_gr_25.gif)
Solve and Substitute
Solve the system of six boundary conditions in six variables (c1, ..., c6) to determine the constants of integration.
![[Graphics:Images/index_gr_26.gif]](Images/index_gr_26.gif)
![[Graphics:Images/index_gr_27.gif]](Images/index_gr_27.gif)
Finally, substitute the expressions for the constants back into the general solutions and simplify.
![[Graphics:Images/index_gr_28.gif]](Images/index_gr_28.gif)
![[Graphics:Images/index_gr_29.gif]](Images/index_gr_29.gif)
![[Graphics:Images/index_gr_30.gif]](Images/index_gr_30.gif)
![[Graphics:Images/index_gr_31.gif]](Images/index_gr_31.gif)
![[Graphics:Images/index_gr_32.gif]](Images/index_gr_32.gif)
![[Graphics:Images/index_gr_33.gif]](Images/index_gr_33.gif)
Using DSolve
This provides an alternative method to solve the system.
![[Graphics:Images/index_gr_34.gif]](Images/index_gr_34.gif)
![[Graphics:Images/index_gr_35.gif]](Images/index_gr_35.gif)
![[Graphics:Images/index_gr_36.gif]](Images/index_gr_36.gif)
![[Graphics:Images/index_gr_37.gif]](Images/index_gr_37.gif)
![[Graphics:Images/index_gr_38.gif]](Images/index_gr_38.gif)
![[Graphics:Images/index_gr_39.gif]](Images/index_gr_39.gif)
![[Graphics:Images/index_gr_40.gif]](Images/index_gr_40.gif)
![[Graphics:Images/index_gr_41.gif]](Images/index_gr_41.gif)
![[Graphics:Images/index_gr_42.gif]](Images/index_gr_42.gif)
![[Graphics:Images/index_gr_43.gif]](Images/index_gr_43.gif)
![[Graphics:Images/index_gr_44.gif]](Images/index_gr_44.gif)
![[Graphics:Images/index_gr_45.gif]](Images/index_gr_45.gif)
![[Graphics:Images/index_gr_46.gif]](Images/index_gr_46.gif)
![[Graphics:Images/index_gr_47.gif]](Images/index_gr_47.gif)
![[Graphics:Images/index_gr_48.gif]](Images/index_gr_48.gif)
![[Graphics:Images/index_gr_49.gif]](Images/index_gr_49.gif)
![[Graphics:Images/index_gr_50.gif]](Images/index_gr_50.gif)
![[Graphics:Images/index_gr_51.gif]](Images/index_gr_51.gif)
![[Graphics:Images/index_gr_52.gif]](Images/index_gr_52.gif)
![[Graphics:Images/index_gr_53.gif]](Images/index_gr_53.gif)
![[Graphics:Images/index_gr_54.gif]](Images/index_gr_54.gif)
![[Graphics:Images/index_gr_55.gif]](Images/index_gr_55.gif)
![[Graphics:Images/index_gr_56.gif]](Images/index_gr_56.gif)
Compare
Using DSolve:
![[Graphics:Images/index_gr_57.gif]](Images/index_gr_57.gif)
![[Graphics:Images/index_gr_58.gif]](Images/index_gr_58.gif)
Solving for boundary conditions:
![[Graphics:Images/index_gr_59.gif]](Images/index_gr_59.gif)
![[Graphics:Images/index_gr_60.gif]](Images/index_gr_60.gif)
![[Graphics:Images/index_gr_61.gif]](Images/index_gr_61.gif)
![[Graphics:Images/index_gr_62.gif]](Images/index_gr_62.gif)
![[Graphics:Images/index_gr_63.gif]](Images/index_gr_63.gif)
![[Graphics:Images/index_gr_64.gif]](Images/index_gr_64.gif)
|