S6302017

nor ax£rror -DONE--

7.825e-9 3.115e-8

contours=8 erriim=1 e-3

DEFINITJONS {parameter definitions }

Hs=18 !(m) odległość od stropu warstwy nieprzepuszczalnej do swobodnego zwiei

k=2.3e-8 !(m/s) współczynnik filtracji

dett=15*80 ?(s) delta t

debc=Q.5 ł(m) delta x

0*0.35 I porowatość

: | HNIT1ALVALUE8

I EOUATIONS {PDE^, one for each variabie}

1 h: dt(h)=Hs*k*delV(debm)*dlv(grad<łi)) {one possibiltty}

J|' !h. div(grad(h))=0

IICONSTRMNTS {Integra! c o n straints}

^: 80UN0ARIE8 {The domain definiBon}

REGION 1    { For each materia! region >

START(-10,10) {Walk the domain boundaiy}

{j    vafue(h)=10 LINĘ 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) »atural(h)sQ linę (0,0)

naturalno linę to (0, *8.6) to (-10,-6.6) to ciose

Jj value(h)=10 UNE TO (-4,10)

1 naturaf(h)=0 linę to (-4,-0.5) TO (-3 98,-0.5) TO (-3.98,0)

1 natura!(h)=0 linę (0,0)

I natural(h)=0 linę to (0, -8.5) to (-10, -6.5) to ciose