initial commit / add all books

10 files changed, 169 insertions, 0 deletions

diff --git a/1484/CH10/EX10.1/10_1.sce b/1484/CH10/EX10.1/10_1.sce
new file mode 100755
index 000000000..45eacce07
--- /dev/null
+++ b/1484/CH10/EX10.1/10_1.sce
@@ -0,0 +1,24 @@
+clc 

+//initialisation of variables

+w= 62.4 //lb/ft^3

+x=8 //ft

+A= 16 //ft^2

+X= 2.5 //ft

+X1= 0.66 //ft

+x1= 3.834 //ft

+x2= 2.182 //ft

+//CALCULATIONS

+P= w*x*A

+y= A/3

+P1= w*x*A*0.5*X1

+R= sqrt(P1^2+P^2)

+m= P1/P

+X2= x1-x2

+C= ((2/3)*A)-m*X

+Y= m*X2+ C

+//RESULTS

+printf ('Water pressure on vertical face = %.f lbs',P)

+printf ('\n pressure which acts at the base = %.2f ft',y)

+printf ('\n Resultant = %.f lbs',R)

+printf ('\n x coordinate of the resultant = %.3f ft',X2)

+printf ('\n y coordinate of the resultant = %.3f ft',Y)

diff --git a/1484/CH10/EX10.10/10_10.sce b/1484/CH10/EX10.10/10_10.sce
new file mode 100755
index 000000000..23fb07e3c
--- /dev/null
+++ b/1484/CH10/EX10.10/10_10.sce
@@ -0,0 +1,19 @@
+

+

+clc 

+//initialisation of variables

+g= 32.2 //ft/sec^2

+sct= 1.6

+sl= 0.8

+K= 0.98

+dh1= 4 //ft

+W= 62.4 //lbs/ft^3

+d1= 8 //in

+d2= 6 //in

+//CALCULATIONS

+dp= dh1*((sct/sl)-1)

+C= sqrt(2*g)*%pi*(d1/24)^2 /sqrt((d1^2/d2^2)^2 -1)

+Q= C*K*sqrt(dh1)

+//RESULTS

+printf ('Discharge passing through the pipe= %.1f cuses ',Q)

+//The answer given in textbook is wrong. Please verify it.

diff --git a/1484/CH10/EX10.2/10_2.sce b/1484/CH10/EX10.2/10_2.sce
new file mode 100755
index 000000000..b91446298
--- /dev/null
+++ b/1484/CH10/EX10.2/10_2.sce
@@ -0,0 +1,16 @@
+clc 

+//initialisation of variables

+s= 13.6

+h= 12 //in

+u= 0.04

+k= 1

+d= 6 //in

+g= 32.2 //ft/sec^2

+w= 62.4 //lbs/ft^3

+//CALCULATIONS

+h1= h*(s-1)/12

+hf= u*h1

+hn= h1-hf

+Q= k*(%pi*(d/12)^2)*sqrt(2*g)*sqrt(hn)*w*60/(10*4*sqrt(15))

+//RESULTS

+printf ('discharge through flow= %.f ft G.P.M',Q)

diff --git a/1484/CH10/EX10.3/10_3.sce b/1484/CH10/EX10.3/10_3.sce
new file mode 100755
index 000000000..cbf3e5f25
--- /dev/null
+++ b/1484/CH10/EX10.3/10_3.sce
@@ -0,0 +1,13 @@
+clc 

+//initialisation of variables

+za= 16 //ft

+h1= 2 //ft

+h2= 3 //ft

+g= 32.2 //ft/sec^2

+//CALCULATIONS

+vc= sqrt(2*g*(za-h1-h2))

+vb= vc*(h1/(2*h1))^2

+r= -h1-h2-(vb^2/(2*g))

+r1= r+34

+//RESULTS

+printf ('pressure head at B= %.1f ft lb',r1)

diff --git a/1484/CH10/EX10.4/10_4.sce b/1484/CH10/EX10.4/10_4.sce
new file mode 100755
index 000000000..c643d3ff8
--- /dev/null
+++ b/1484/CH10/EX10.4/10_4.sce
@@ -0,0 +1,13 @@
+clc 

+//initialisation of variables

+g= 32.2 //ft/sec^2

+Cd= 0.62

+a= 90 //degrees

+H1= 14 //in

+H2= 8 //in

+//CALCULATIONS

+Q1= (8/15)*Cd*sqrt(2*g)*tand(a/2)*(H1/12)^(5/2)

+Q2= (8/15)*Cd*sqrt(2*g)*tand(a/2)*(H2/12)

+Q= Q1-Q2

+//RESULTS

+printf ('Discharge through notch= %.2f cuses',Q)

diff --git a/1484/CH10/EX10.5/10_5.sce b/1484/CH10/EX10.5/10_5.sce
new file mode 100755
index 000000000..fa9ea434d
--- /dev/null
+++ b/1484/CH10/EX10.5/10_5.sce
@@ -0,0 +1,10 @@
+clc 

+//initialisation of variables

+g= 32.2 //ft/sec^2

+Cd= 0.62

+d= 5/4 //in

+h= 9 //ft

+//CALCULATIONS

+T= (2/3)*%pi*(h)^(3/2)/(Cd*(%pi/4)*sqrt(2*g)*(d/12)^2)

+//RESULTS

+printf ('time required to lower water level= %.f secs',T)

diff --git a/1484/CH10/EX10.6/10_6.sce b/1484/CH10/EX10.6/10_6.sce
new file mode 100755
index 000000000..a452ba13d
--- /dev/null
+++ b/1484/CH10/EX10.6/10_6.sce
@@ -0,0 +1,15 @@
+

+clc 

+//initialisation of variables

+a= 60 //degrees

+d= 4 //in

+Cd= 0.62

+h= 5 //ft

+w= 30 //ft

+g= 32.2 //ft/sec^2

+//CALCULATIONS

+H1= 10*sind(a)

+H2= H1-h

+T= (2*w/tand(a))*(2/3)*(H1^(3/2)-H2^(3/2))/(Cd*sqrt(2*g)*%pi/(4*(d/12)^2))*100

+//RESULTS

+printf ('time required to lower water level= %.f secs',T)

diff --git a/1484/CH10/EX10.7/10_7.sce b/1484/CH10/EX10.7/10_7.sce
new file mode 100755
index 000000000..81841cc19
--- /dev/null
+++ b/1484/CH10/EX10.7/10_7.sce
@@ -0,0 +1,22 @@
+

+clc 

+//initialisation of variables

+p1= 40 //percent

+p2= 35 //percent

+dh= 200 //ft

+f= 0.1

+g= 32.2 //ft/sec^2

+l= 2000 //ft

+d= 1 //ft

+//CALCULATIONS

+hf1= p1*dh/100

+hf2= p2*dh/100

+hf3= (100-p1-p2)*dh/100

+hft= hf1+hf2+hf3

+v1= sqrt(2*g*hf1/(4*f*l))

+Q= v1*%pi*d^2/4

+d2= (Q*7*sqrt(3/(5*g)))^(2/3)

+v3= Q*4*(4/3)^2/%pi

+l3= hf2*2*g*(3/4)/(4*f*v3^2)

+//RESULTS

+printf ('proportion of the quantity folwing in the bypass to the whole pass= %.f ft',l3)

diff --git a/1484/CH10/EX10.8/10_8.sce b/1484/CH10/EX10.8/10_8.sce
new file mode 100755
index 000000000..1070b01d3
--- /dev/null
+++ b/1484/CH10/EX10.8/10_8.sce
@@ -0,0 +1,19 @@
+clc 

+//initialisation of variables

+d= 1 //ft

+l= 2000 //ft

+f= 0.038

+g= 32.2 ///ft/sec^2

+Q= 6 //cuses

+l1= 1500 //ft

+r= 2

+//CALCULATIONS

+v= 4*Q/(d^2*%pi)

+hf= 4*f*l*v^2/(2*g)

+v1= sqrt(hf*2*g/(4*f*l1+4*f*(l-l1)*r^2))

+v3= r*v1

+Q1= %pi*d^2*v3/4

+Q2= %pi*d^2*v1/4

+r1= Q2/Q1

+//RESULTS

+printf ('proportion of the quantity folwing in the bypass to the whole pass= %.1f ',r1)

diff --git a/1484/CH10/EX10.9/10_9.sce b/1484/CH10/EX10.9/10_9.sce
new file mode 100755
index 000000000..1ac10093d
--- /dev/null
+++ b/1484/CH10/EX10.9/10_9.sce
@@ -0,0 +1,18 @@
+clc 

+//initialisation of variables

+f= 0.01

+d= 3 //in

+l= 22 //ft

+l1= 20 //ft

+w= 20 //ft

+h= 5 //ft

+h1= 20 //ft

+t= 4 //min

+g= 32.2 //ft/sec^2

+//CALCULATIONS

+h2= h+h1

+h3= (h-(t*60*%pi*sqrt(2*g/h)/(l1*w*2*64)))^2-4

+dh= h2-h3

+Q= dh*l1*w

+//RESULTS

+printf ('Quantiy discharged= %.f cuses ',Q)