1 files changed, 13 insertions, 0 deletions
diff --git a/569/CH4/EX4.6/4_6.sci b/569/CH4/EX4.6/4_6.sci
new file mode 100755
index 000000000..6ca3938b7
--- /dev/null
+++ b/569/CH4/EX4.6/4_6.sci
@@ -0,0 +1,13 @@
+// Calculate the depth after one hour
+clc;
+Qm=0.16*10^-3;
+Hin=1.2;
+K1=Qm/(Hin)^0.5;
+Qo=0.2*10^-3;
+Ho=(Qo/K1)^2;
+R=Hin/Qm;
+C=0.1;
+tc=R*C;
+t=3600;
+H=Ho+(Hin-Ho)*exp(-t/tc);
+disp(H,'the depth after one hour(m)')
+\ No newline at end of file