initial commit / add all books

14 files changed, 214 insertions, 0 deletions

diff --git a/2132/CH11/EX11.1/Example11_1.sce b/2132/CH11/EX11.1/Example11_1.sce
new file mode 100755
index 000000000..c180cc43b
--- /dev/null
+++ b/2132/CH11/EX11.1/Example11_1.sce
@@ -0,0 +1,13 @@
+//Example 11.1

+clc;

+clear;

+close;

+format('v',5);

+//Given data :

+staticPHead=5;//meter

+stagnationPHead=6;//meter

+h=stagnationPHead-staticPHead;//meter

+g=9.81;//constant

+Cv=0.98;//Coeff of pilot tube

+V=Cv*sqrt(2*g*h);//m/s

+disp(V,"Velocity of flow in m/sec : ");

diff --git a/2132/CH11/EX11.10/Example11_10.sce b/2132/CH11/EX11.10/Example11_10.sce
new file mode 100755
index 000000000..32ada77c9
--- /dev/null
+++ b/2132/CH11/EX11.10/Example11_10.sce
@@ -0,0 +1,13 @@
+//Example 11.10

+clc;

+clear;

+close;

+format('v',7);

+//Given data :

+Cd=0.62;//Coeff of discharge

+H=250/1000;//meter

+L=400/1000;//meter

+g=9.81;//gravity acceleration

+Q=2/3*Cd*sqrt(2*g)*L*H^(3/2);//m^3/s or cumec

+disp(Q,"Discharge in cumec : ");

+

diff --git a/2132/CH11/EX11.11/Example6_11.sce b/2132/CH11/EX11.11/Example6_11.sce
new file mode 100755
index 000000000..d0ecad32f
--- /dev/null
+++ b/2132/CH11/EX11.11/Example6_11.sce
@@ -0,0 +1,13 @@
+//Example 6.11

+clc;

+clear;

+close;

+format('v',8);

+//Given data :

+g=9.81;//constant

+Cd=0.6;//Coefficient of discharge

+B=1.3;//meter

+H1=6-(1.8+1.5);//meter

+H2=6-1.5;//meter

+Q=2/3*Cd*B*sqrt(2*g)*(H2^(3/2)-H1^(3/2));//m^3/sec

+disp(Q,"Discharge through the orifice in m^3/sec : ");

diff --git a/2132/CH11/EX11.12/Example11_12.sce b/2132/CH11/EX11.12/Example11_12.sce
new file mode 100755
index 000000000..f1db1e8c2
--- /dev/null
+++ b/2132/CH11/EX11.12/Example11_12.sce
@@ -0,0 +1,16 @@
+//Example 11.12

+clc;

+clear;

+close;

+format('v',7);

+//Given data :

+Cd=0.60;//Coeff of discharge

+L=36;//meter

+H=1.1;//meter

+A=50;//m^2

+g=9.81;//gravity acceleration

+Qmax=1.705*Cd*L*H^(3/2);//m^3/s

+disp(Qmax,"Maximum Discharge in m^3/sec : ");

+Va=Qmax/A;//m/s(velocity of approach)

+Q=1.705*Cd*L*[(H+Va^2/2/g)^(3/2)-(Va^2/2/g)^(3/2)];//m^3/s

+disp(Q,"New discharge considering velocity of approach in m^3/sec : ");

diff --git a/2132/CH11/EX11.13/Example11_13.sce b/2132/CH11/EX11.13/Example11_13.sce
new file mode 100755
index 000000000..991ab5902
--- /dev/null
+++ b/2132/CH11/EX11.13/Example11_13.sce
@@ -0,0 +1,16 @@
+//Example 11.13

+clc;

+clear;

+close;

+format('v',7);

+//Given data :

+w=1.5;//m

+d=0.75;//m

+Cd=0.64;//Coeff of discharge

+QT=45;//cumec

+h=8;//meter

+A=w*d;//m^2

+g=9.81;//gravity acceleration

+Q=Cd*A*sqrt(2*g*h);//m^3/sec

+n=QT/Q;//no. of spillways

+disp(round(n),"No. of spillways : ");

diff --git a/2132/CH11/EX11.14/Example11_14.sce b/2132/CH11/EX11.14/Example11_14.sce
new file mode 100755
index 000000000..4614dcb5c
--- /dev/null
+++ b/2132/CH11/EX11.14/Example11_14.sce
@@ -0,0 +1,15 @@
+//Example 11.14

+clc;

+clear;

+close;

+format('v',6);

+//Given data :

+B=1;//meter

+b=0.4;//meter

+H=0.57;//meter

+h=0.5;//meter

+A=B*H;//m^2

+g=9.81;//gravity constant

+a=b*h;//m^2

+Q=A*a/sqrt(A^2-a^2)*sqrt(2*g*(H-h));//m^3/sec

+disp(Q,"Discharge in m^3/sec : ");

diff --git a/2132/CH11/EX11.2/Example11_2.sce b/2132/CH11/EX11.2/Example11_2.sce
new file mode 100755
index 000000000..ed38e99e4
--- /dev/null
+++ b/2132/CH11/EX11.2/Example11_2.sce
@@ -0,0 +1,13 @@
+//Example 11.2

+clc;

+clear;

+close;

+format('v',5);

+//Given data :

+Cv=0.975;//Coeff of pilot tube

+h=100/1000;//meter

+g=9.81;//constant

+Sm=13.6;//Sp. gravity

+S=0.86;//gravity of turpinre

+V=Cv*sqrt(2*g*h*(Sm/S-1));//m/s

+disp(V,"Velocity in m/sec : ");

diff --git a/2132/CH11/EX11.3/Example11_3.sce b/2132/CH11/EX11.3/Example11_3.sce
new file mode 100755
index 000000000..c87c3830b
--- /dev/null
+++ b/2132/CH11/EX11.3/Example11_3.sce
@@ -0,0 +1,31 @@
+//Example 11.3

+clc;

+clear;

+close;

+format('v',9);

+//Given data :

+l=2;//meter

+d0=0;//meter

+d1=0.3;//meter

+d2=1.0;//meter

+d3=1.2;//meter

+d4=1.6;//meter

+d5=2.0;//meter

+d6=1.4;//meter

+d7=1.0;//meter

+d8=0.4;//meter

+d9=0.3;//meter

+d10=0.2;//meter

+V0=0;//meter

+V1=0.5;//meter

+V2=0.7;//meter

+V3=0.8;//meter

+V4=1.0;//meter

+V5=1.2;//meter

+V6=0.9;//meter

+V7=0.8;//meter

+V8=0.6;//meter

+V9=0.5;//meter

+V10=0.3;//meter

+Q=l/3*(d0*V0+4*d1*V1+2*d2*V2+4*d3*V3+2*d4*V4+4*d5*V5+2*d6*V6+4*d7*V7+2*d8*V8+4*d9*V9+2*d10*V10+d0*V0);//cum/sec

+disp(Q,"Rate of discharge in cum/sec : ");

diff --git a/2132/CH11/EX11.4/Example11_4.sce b/2132/CH11/EX11.4/Example11_4.sce
new file mode 100755
index 000000000..374116600
--- /dev/null
+++ b/2132/CH11/EX11.4/Example11_4.sce
@@ -0,0 +1,12 @@
+//Example 11.4

+clc;

+clear;

+close;

+format('v',7);

+//Given data :

+Cd=0.62;//constant

+H=0.12;//meter

+L=0.3;//meter

+g=9.81;//constant

+Q=2/3*Cd*sqrt(2*g)*L*H^(3/2);//m^3/s

+disp(Q,"Discharge in m^3/sec : ");

diff --git a/2132/CH11/EX11.5/Example11_5.sce b/2132/CH11/EX11.5/Example11_5.sce
new file mode 100755
index 000000000..f6ddadae9
--- /dev/null
+++ b/2132/CH11/EX11.5/Example11_5.sce
@@ -0,0 +1,13 @@
+//Example 11.5

+clc;

+clear;

+close;

+format('v',8);

+//Given data :

+Cd=0.66;//constant

+H=0.15;//meter

+L=0.40;//meter

+g=9.81;//constant

+Q=2/3*Cd*sqrt(2*g)*L*H^(3/2);//m^3/s

+disp(Q,"Discharge in m^3/sec : ");

+disp(Q*10^3,"Discharge in litres/sec : ");

diff --git a/2132/CH11/EX11.6/Example11_6.sce b/2132/CH11/EX11.6/Example11_6.sce
new file mode 100755
index 000000000..7bf024aa3
--- /dev/null
+++ b/2132/CH11/EX11.6/Example11_6.sce
@@ -0,0 +1,13 @@
+//Example 11.6

+clc;

+clear;

+close;

+format('v',6);

+//Given data :

+Cd=0.62;//constant

+H=200/1000;//meter

+theta=90;//degree

+g=9.81;//constant

+Q=8/15*Cd*sqrt(2*g)*tand(theta/2)*H^(5/2);//m^3/s

+Q=Q*1000*60;//litres/minute

+disp(Q,"Discharge in litres/minute : ");

diff --git a/2132/CH11/EX11.7/Example11_7.sce b/2132/CH11/EX11.7/Example11_7.sce
new file mode 100755
index 000000000..805eaf8d2
--- /dev/null
+++ b/2132/CH11/EX11.7/Example11_7.sce
@@ -0,0 +1,15 @@
+//Example 11.7

+clc;

+clear;

+close;

+format('v',6);

+//Given data :

+Cd=0.62;//constant

+Q=250;//litres/sec

+Q=Q*10^-3;//m^3/s

+theta=90;//degree

+g=9.81;//constant

+d=1.3;//meter

+H=(Q/8*15/Cd/sqrt(2*g)/tand(theta/2))^(2/5);//m

+h=d-H;//meter

+disp(h,"Position above the bed in meter : ");

diff --git a/2132/CH11/EX11.8/Example11_8.sce b/2132/CH11/EX11.8/Example11_8.sce
new file mode 100755
index 000000000..1c44bb316
--- /dev/null
+++ b/2132/CH11/EX11.8/Example11_8.sce
@@ -0,0 +1,14 @@
+//Example 11.8

+clc;

+clear;

+close;

+format('v',6);

+//Given data :

+Cd=0.65;//constant

+A=220;//m^2

+g=9.81;//constant

+l=30/100;//meter

+H1=16.8/100;//meter

+H2=6.8/100;//meter

+T=A/[2/3*Cd*l*sqrt(2*g)]*integrate('h^(-3/2)','h',H2,H1);//sec

+disp("Time taken is "+string(floor(T/60))+" minute "+string((T/60-floor(T/60))*60)+" sec.")

diff --git a/2132/CH11/EX11.9/Example11_9.sce b/2132/CH11/EX11.9/Example11_9.sce
new file mode 100755
index 000000000..6807c5a68
--- /dev/null
+++ b/2132/CH11/EX11.9/Example11_9.sce
@@ -0,0 +1,17 @@
+//Example 11.9

+clc;

+clear;

+close;

+format('v',7);

+//Given data :

+H=0.40;//meter

+L=5;//meter

+disp("(i) End contractions are Suppressed : ");

+Q=1.84*L*H^(3/2);//m^3/s

+disp(Q,"Discharge in m^3/sec : ");

+disp(Q*1000,"Discharge in litres/sec : ");

+disp("(ii) End contractions are Considered : ");

+n=2;

+Q=1.84*(L-0.1*n*H)*H^(3/2);//m^3/s

+disp(Q,"Discharge in m^3/sec : ");

+disp(Q*1000,"Discharge in litres/sec : ");