S6302011

i romDtnrssB^---

|enłim=le-3

DEFINITfONS {parameter defm»ons}    _ ____,___iaritaw0dv

Hs=18 Km) odległość od stropu warstwy nieprzepuszczalnej do swobodnego zwierciadła wody

k=2.3e-6 l(m/s) współczynnik filtracji |dell=15*60 l(s)deltjat j detx=0 5 Km) delta x n=0.35! porowatość

I INfTlAL VALUES

£QUATIONS {PDE's, one for each variable}

!h: dt(h)=Hs*k*deW(deK*n)*dhKfirad(h)) {one possibiiity} h: dlv(grad(h))=0

CONSTRAINTS {Integra! constraints}

BOUNDARIES {The domain definiflon}

REGION 1    {For each materia! region}

START(-10,10) {Walk the domain boundary} value(h>=10 UNE TO (-4,10) natural(h)=0 linę to (-4.8 5) value(h)=y linę TO (-4,6)

natural(h)=0 linę to (-4,-0 5) to (-3.98,-0 5) TO (-3.98,0) natural(h)=0 linę (0,0)

nstura!(h)=0 linę to (0, -6.5) to (-10, -6.5) to close

value(h)=10 UNE TO (-4.10)

natural(h)=0 linę to (-4.-0.5) TO (-3.98,-0 5) TO (-3.98.0)

nalural(h)=0 linę (0.0)

natural(h)=0 linę to (0, -6.5) to (-10, -6.5) to close

(TIME 0TO60*3600 {iftimedependent)

IMONFTOR8 {show progress}

lfort=l by delt to 4*deit by 3600 to 60*3600 Contour(h) painted

PLOTS {save result displays}

)w FtexPOE Professional.

E:\Met Num w Hydrat... ■ Mcrosoft Excel