initial commit / add all books

11 files changed, 115 insertions, 0 deletions

diff --git a/2159/CH5/EX5.1/51.sce b/2159/CH5/EX5.1/51.sce
new file mode 100755
index 000000000..580353799
--- /dev/null
+++ b/2159/CH5/EX5.1/51.sce
@@ -0,0 +1,8 @@
+// problem 5.1

+q=0.2

+Cd=0.62

+g=9.81

+// using the relation

+z=(3*q*(2^1.5))/(2*Cd*((2*g)^0.5))

+b=z^0.4

+disp(b*100,"the lenght of the notch in cm ")

diff --git a/2159/CH5/EX5.10/510.sce b/2159/CH5/EX5.10/510.sce
new file mode 100755
index 000000000..1f6597ec2
--- /dev/null
+++ b/2159/CH5/EX5.10/510.sce
@@ -0,0 +1,12 @@
+// problem 5.10

+Cd=0.6

+x=45

+H=0.5

+g=9.81

+q1=(8*Cd*tand(x/2)*((2*g)^0.5)*(H^2.5))/15

+disp(q1,"rate of flow over the rectangular notch in m3/sec")

+dq1=0.025

+dh=dq1*H/2.5

+h1=H+dh

+h2=H-dh

+disp(h1*100,h2*100,"limiting values of head in centimeters")

diff --git a/2159/CH5/EX5.11/511.sce b/2159/CH5/EX5.11/511.sce
new file mode 100755
index 000000000..cd5a9ad4c
--- /dev/null
+++ b/2159/CH5/EX5.11/511.sce
@@ -0,0 +1,10 @@
+// problem 5.11

+Cd=0.6

+x=90

+q=0.05

+g=9.81

+dh=0.00025

+z=(15*q)/(8*Cd*((2*g)^0.5)*(tand(x/2)))

+H=z^0.4

+error=2.5*(dh/H)

+disp(error*100,"the percentage error in the discharge")

diff --git a/2159/CH5/EX5.2/52.sce b/2159/CH5/EX5.2/52.sce
new file mode 100755
index 000000000..9276dc2bb
--- /dev/null
+++ b/2159/CH5/EX5.2/52.sce
@@ -0,0 +1,11 @@
+// problem 4.2

+b=1

+H=0.15

+Cd1=0.62

+x=90

+g=9.81

+Cd2=0.58

+Q1=2*Cd1*b*((2*g*H*H*H)^0.5)/3

+z=(15*Q1)/(8*Cd2*((2*g)^0.5)*tand(x/2))

+H1=z^0.4

+disp(H1*100,"the depth over the traingular veir in cm")

diff --git a/2159/CH5/EX5.3/53.sce b/2159/CH5/EX5.3/53.sce
new file mode 100755
index 000000000..a8505b952
--- /dev/null
+++ b/2159/CH5/EX5.3/53.sce
@@ -0,0 +1,8 @@
+// problem 5.3

+x=90

+Cd=0.62

+H=0.36

+g=9.81

+Q=(8*Cd*tand(x/2)*((2*g)^0.5)*(H^2.5))/15

+q=Q*1000

+disp(q,"the actual discharge in litres/sec")

diff --git a/2159/CH5/EX5.4/54.sce b/2159/CH5/EX5.4/54.sce
new file mode 100755
index 000000000..d2569c551
--- /dev/null
+++ b/2159/CH5/EX5.4/54.sce
@@ -0,0 +1,10 @@
+// problem 5.4

+x=90

+H=0.2

+b=0.3

+Cd=0.62

+g=9.81

+q1=(8*Cd*tand(x/2)*((2*g)^0.5)*(H^2.5))/15

+q2=2*Cd*b*((2*g*H*H*H)^0.5)/3

+q=q1+q2

+disp(q,"discharge over the trapezoidal notch in m3/sec")

diff --git a/2159/CH5/EX5.5/55.sce b/2159/CH5/EX5.5/55.sce
new file mode 100755
index 000000000..5a72f1fc9
--- /dev/null
+++ b/2159/CH5/EX5.5/55.sce
@@ -0,0 +1,10 @@
+// problem 5.5

+a=20*(10^6)

+x=0.03

+q=a*x

+qf=q*0.4/3600

+n=2

+H=0.6

+// Using Francis formula 

+L=(qf/(1.84*(H^1.5)))+(0.1*n*H)

+disp(L,"the lenght of the weir in m")

diff --git a/2159/CH5/EX5.6/56.sce b/2159/CH5/EX5.6/56.sce
new file mode 100755
index 000000000..5023fc560
--- /dev/null
+++ b/2159/CH5/EX5.6/56.sce
@@ -0,0 +1,12 @@
+// problem 5.6

+L=36

+v1=2

+g=9.81

+H=1.2

+H1=(v1*v1)/(2*g)

+n=2*12

+w=0.6

+Nv=11

+Lf=L-(Nv*w)

+Q=1.84*(Lf-(0.1*n*(H+H1)))*((H+H1)^1.5-(H1^1.5))

+disp(Q,"dischsrge over the weir in m3/sec")

diff --git a/2159/CH5/EX5.7/57.sce b/2159/CH5/EX5.7/57.sce
new file mode 100755
index 000000000..80a566239
--- /dev/null
+++ b/2159/CH5/EX5.7/57.sce
@@ -0,0 +1,12 @@
+// problem 5.7

+l=0.77

+H=0.39

+H1=0.6

+Dp=H+H1

+Cd=0.623

+g=9.81

+Q=(2*Cd*l*((2*g*H*H*H)^0.5))/3

+v=Q/(l*Dp)

+Ha=(v*v)/(2*g)

+q=(2*Cd*l*((2*g)^0.5)*(((H+Ha)^1.5)-(Ha^1.5)))/3

+disp(q,"discharge in m3/sec")

diff --git a/2159/CH5/EX5.8/58.sce b/2159/CH5/EX5.8/58.sce
new file mode 100755
index 000000000..4ce4506c3
--- /dev/null
+++ b/2159/CH5/EX5.8/58.sce
@@ -0,0 +1,10 @@
+// problem 5.8

+Q1=0.005

+Cd=0.62

+g=9.81

+Q2=0.75

+h=0.07

+z=(Q1*15)/(8*Cd*((2*g)^0.5)*(h^2.5))

+H=h*((Q2/Q1)^0.4)

+W=2*H*z

+disp(W,"width of the water surface in m")

diff --git a/2159/CH5/EX5.9/59.sce b/2159/CH5/EX5.9/59.sce
new file mode 100755
index 000000000..544ba3375
--- /dev/null
+++ b/2159/CH5/EX5.9/59.sce
@@ -0,0 +1,12 @@
+// problem 5.9

+b=4

+H=0.2

+Cd=0.62

+g=9.81

+Q1=2*Cd*b*((2*g*H*H*H)^0.5)/3

+Q2=(2*Cd*((2*g)^0.5)*(H^1.5)*(b-(0.2*H)))/3

+m=0.405+(0.003/H)

+Q3=m*b*((2*g)^0.5)*(H^1.5)

+disp(Q1,"discharge when end contraction are supressed in m3/sec")

+disp(Q2,"discharge when end contraction are taken into account by francis formula in m3/sec")

+disp(Q3,"discharge when end contraction are taken into account by bazin formula in m3/sec")