initial commit / add all books

20 files changed, 161 insertions, 0 deletions

diff --git a/629/CH4/EX4.12/ex4_12.txt b/629/CH4/EX4.12/ex4_12.txt
new file mode 100644
index 000000000..b067ae916
--- /dev/null
+++ b/629/CH4/EX4.12/ex4_12.txt
@@ -0,0 +1,5 @@
+ 

+The velocity at 10km from the center = 16 m/s.

+

+The pressure difference between two locations = 806 Pa.

+ 
\ No newline at end of file
diff --git a/629/CH4/EX4.12/example4_12.sce b/629/CH4/EX4.12/example4_12.sce
new file mode 100644
index 000000000..7639c1e58
--- /dev/null
+++ b/629/CH4/EX4.12/example4_12.sce
@@ -0,0 +1,14 @@
+clear

+clc

+//Example 4.12 VELOCITY AND PRESSURE DISTRIBUTION IN A FREE VORTEX

+rho=1.2; //density[kg/m^3]

+r1=4; //[km]

+r2=10; //[km]

+V1=40; //velocity[m/s]

+//Velocity distribution, V=C/r

+C=r1*V1 

+V2=C/r2 //[m/s]

+printf("\nThe velocity at 10km from the center = %.f m/s.\n",V2)

+//Bernoulli equation, for horizontal plane

+delp=rho*(V1^2-V2^2)/2 //delp=p2-p1,[Pa]

+printf("\nThe pressure difference between two locations = %.f Pa.\n",delp)
\ No newline at end of file
diff --git a/629/CH4/EX4.13/ex4_13.txt b/629/CH4/EX4.13/ex4_13.txt
new file mode 100644
index 000000000..59d095eeb
--- /dev/null
+++ b/629/CH4/EX4.13/ex4_13.txt
@@ -0,0 +1,2 @@
+ 

+The pressure difference between center and outer edge of mercury = -1.59 in Hg
\ No newline at end of file
diff --git a/629/CH4/EX4.13/example4_13.sce b/629/CH4/EX4.13/example4_13.sce
new file mode 100644
index 000000000..41b34a273
--- /dev/null
+++ b/629/CH4/EX4.13/example4_13.sce
@@ -0,0 +1,11 @@
+clear

+clc

+//Example 4.13 PRESSURE DIFFERENCE IN TORNADO

+//1mi=5280ft, 1hr=3600s

+V=150*5280/3600 //[ft/s]

+//1slug=32.2lbm

+rho=0.075/32.2 //density[slug/ft^3]

+//Pressure difference, p1-p0=-rho*V^2

+//29.92 in Hg=2116 psf

+delp=-rho*V^2*(29.92/2116) //inches of Hg

+printf("\nThe pressure difference between center and outer edge of mercury = %.2f in Hg.\n",delp)
\ No newline at end of file
diff --git a/629/CH4/EX4.2/ex4_2.txt b/629/CH4/EX4.2/ex4_2.txt
new file mode 100644
index 000000000..f82815e54
--- /dev/null
+++ b/629/CH4/EX4.2/ex4_2.txt
@@ -0,0 +1,2 @@
+ 

+The gage pressure on the piston, p = 11.0 kPa, gage.
\ No newline at end of file
diff --git a/629/CH4/EX4.2/example4_2.sce b/629/CH4/EX4.2/example4_2.sce
new file mode 100644
index 000000000..d53b32650
--- /dev/null
+++ b/629/CH4/EX4.2/example4_2.sce
@@ -0,0 +1,12 @@
+clear

+clc

+//Example 4.2 APPLICATION OF EULER’S EQUATION TO ACCELERATION OF A FLUID

+g=9.81; //[m/s^2]

+az=100; //acceleration in z direction [m/s^2]

+rho=10^3; //[kg/m^3]

+//Integrating, d(p+g*rho*z)/dz=-rho*az

+//(p2+rho*g*z2)-(p1+rho*g*z1)=-rho*az*(z2-z1)

+delz=0.1; //delz=z2-z1,[m]

+p2=0;

+p1=(p2+rho*(g+az)*delz)/10^3 //[kPa]

+printf("\nThe gage pressure on the piston, p = %.1f kPa, gage.\n",p1)
\ No newline at end of file
diff --git a/629/CH4/EX4.3/ex4_3.txt b/629/CH4/EX4.3/ex4_3.txt
new file mode 100644
index 000000000..8e3d17ada
--- /dev/null
+++ b/629/CH4/EX4.3/ex4_3.txt
@@ -0,0 +1,4 @@
+ 

+(a)The pressure at the top front, p = 261 psfg (= 12.5 kPa,gage).

+

+(b)The maximum pressure in the tank, pmax = 513 psfg (= 24.6 kPa,gage)
\ No newline at end of file
diff --git a/629/CH4/EX4.3/example4_3.sce b/629/CH4/EX4.3/example4_3.sce
new file mode 100644
index 000000000..783c2a930
--- /dev/null
+++ b/629/CH4/EX4.3/example4_3.sce
@@ -0,0 +1,17 @@
+clear

+clc

+//Example 4.3 PRESSURE IN A DECELERATING TANK OF LIQUID

+p1=0;

+Gamma=42; //[lbf/ft^3]

+g=32.2; //[ft/s^2]

+al=-10; //[ft/s^2]

+l=20; //[ft]

+//Euler's equation along the top of tank, dp/dl=-Gamma*l/g

+p2=p1-Gamma*al*l/g //[psfg]

+//1kPa=20.88psfg

+printf("\n(a)The pressure at the top front, p = %.f psfg (= %.1f kPa,gage).\n",p2,p2/20.88)

+//Eulers equation in vertical direction,

+//d(p+Gamma*z)/dz=-rho*az, az=0

+delz=6; //delz=z2-z3,[ft]

+p3=p2+Gamma*delz //[psfg]

+printf("\n(b)The maximum pressure in the tank, pmax = %.f psfg (= %.1f kPa,gage).\n",p3,p3/20.88)
\ No newline at end of file
diff --git a/629/CH4/EX4.4/ex4_4.txt b/629/CH4/EX4.4/ex4_4.txt
new file mode 100644
index 000000000..b63c1ade1
--- /dev/null
+++ b/629/CH4/EX4.4/ex4_4.txt
@@ -0,0 +1,3 @@
+ 

+The elevation difference between the liquid at the center and the wall, during rotation = 0.051 m.

+ 
\ No newline at end of file
diff --git a/629/CH4/EX4.4/example4_4.sce b/629/CH4/EX4.4/example4_4.sce
new file mode 100644
index 000000000..2feeece3d
--- /dev/null
+++ b/629/CH4/EX4.4/example4_4.sce
@@ -0,0 +1,12 @@
+clear

+clc

+//Example 4.4 SURFACE PROFILE OF ROTATING LIQUID

+g=9.81; //[m/s^2]

+d=0.5; //[m]

+w=4; //(rad/s)

+//(p1/gamma)+z1-(w^2*r1^2/(2*g))=(p2/gamma)+z2-(w^2*r2^2/(2*g))

+//p1=p2

+r1=0; //[m]

+r2=d/2; //[m]

+delz=(w^2*(r2^2-r1^2)/(2*g)) //delz=(z2-z1),[m]

+printf("\nThe elevation difference between the liquid at the center and the wall, during rotation = %.3f m.\n",delz)
\ No newline at end of file
diff --git a/629/CH4/EX4.5/ex4_5.txt b/629/CH4/EX4.5/ex4_5.txt
new file mode 100644
index 000000000..45d806291
--- /dev/null
+++ b/629/CH4/EX4.5/ex4_5.txt
@@ -0,0 +1,2 @@
+ 

+The new levels of water in the tube are z1 = 0.021 m, z2 = 0.339 m.
\ No newline at end of file
diff --git a/629/CH4/EX4.5/example4_5.sce b/629/CH4/EX4.5/example4_5.sce
new file mode 100644
index 000000000..dabd3d8a8
--- /dev/null
+++ b/629/CH4/EX4.5/example4_5.sce
@@ -0,0 +1,19 @@
+clear

+clc

+//Example 4.5 ROTATING MANOMETER TUBE

+g=9.81; //[m/s^2]

+r1=0.18; //[m]

+r2=0.36; //[m]

+//Initial water levels

+h1=0.18; //[m]

+h2=0.18; //[m]

+w=8; //angular speed[rad/s]

+//-z1+z2=w^2*(r2^2-r1^2)/(2*g)

+//z1+z2=h1+h2

+A=[-1 1;1 1];

+B=[w^2*(r2^2-r1^2)/(2*g); h1+h2]

+//Az=B, z=(A^-1)*B, z=[z1;z2]

+z=inv(A)*B

+z1=z(1) //[m]

+z2=z(2) //[m]

+printf("\nThe new levels of water in the tube are z1 = %.3f m, z2 = %.3f m.\n",z1,z2)
\ No newline at end of file
diff --git a/629/CH4/EX4.6/ex4_6.txt b/629/CH4/EX4.6/ex4_6.txt
new file mode 100644
index 000000000..829524b52
--- /dev/null
+++ b/629/CH4/EX4.6/ex4_6.txt
@@ -0,0 +1,2 @@
+ 

+The velocity in the throat section = 3.62 m/s.
\ No newline at end of file
diff --git a/629/CH4/EX4.6/example4_6.sce b/629/CH4/EX4.6/example4_6.sce
new file mode 100644
index 000000000..4c542a50c
--- /dev/null
+++ b/629/CH4/EX4.6/example4_6.sce
@@ -0,0 +1,10 @@
+clear

+clc

+//Example 4.6 VELOCITY IN A VENTURI SECTION

+h1=1; //[m]

+h2=0.5; //[m]

+g=9.81; //[m/s^2]

+//h1-h2=(V2^2-V1^2)/(2*g), V2=2*V1

+V1=sqrt(2*g*(h1-h2)/3) //[m/s]

+V2=2*V1 //[m/s]

+printf("\nThe velocity in the throat section = %.2f m/s.\n",V2)
\ No newline at end of file
diff --git a/629/CH4/EX4.7/ex4_7.txt b/629/CH4/EX4.7/ex4_7.txt
new file mode 100644
index 000000000..74c3803cd
--- /dev/null
+++ b/629/CH4/EX4.7/ex4_7.txt
@@ -0,0 +1,3 @@
+ 

+The velocity of the liquid in the drain port = 14 m/s.

+ 
\ No newline at end of file
diff --git a/629/CH4/EX4.7/example4_7.sce b/629/CH4/EX4.7/example4_7.sce
new file mode 100644
index 000000000..348b16f21
--- /dev/null
+++ b/629/CH4/EX4.7/example4_7.sce
@@ -0,0 +1,9 @@
+clear

+clc

+//Example 4.7 OUTLET VELOCITY FROM DRAINING TANK

+g=9.81; //[m/s^2]

+delz=10; //delz=(z1-z2),[m]

+//(p1/gamma)+z1-(V1^2/(2*g))=(p2/gamma)+z2-(V2^2/(2*g)), p1=p2

+V1=0;//[m]

+V2=sqrt(V1^2+2*g*delz) //[m/s]

+printf("\nThe velocity of the liquid in the drain port = %.f m/s.\n",V2)
\ No newline at end of file
diff --git a/629/CH4/EX4.8/ex4_8.txt b/629/CH4/EX4.8/ex4_8.txt
new file mode 100644
index 000000000..77f02612c
--- /dev/null
+++ b/629/CH4/EX4.8/ex4_8.txt
@@ -0,0 +1,3 @@
+ 

+ The kerosene velocity in the pipe = 24.3 ft/s.

+ 
\ No newline at end of file
diff --git a/629/CH4/EX4.8/example4_8.sce b/629/CH4/EX4.8/example4_8.sce
new file mode 100644
index 000000000..0e7fd3ca6
--- /dev/null
+++ b/629/CH4/EX4.8/example4_8.sce
@@ -0,0 +1,17 @@
+clear

+clc

+//Example 4.8 APPLICATION OF PITOT EQUATION WITH MANOMETER

+g=32.2; //[ft/s^2]

+y=7/12; //[ft]

+//Specific gravities

+S_kero=0.81;

+S_Hg=13.55;

+//Specific weights

+g_water=62.4; //[lbf/ft^3]

+g_Hg=S_Hg*g_water //[lbf/ft^3]

+g_kero=S_kero*g_water //[lbf/ft^3]

+rho_kero=g_kero/g //density[lbm/ft^3]

+//Manometer equation, pz1-pz2=y*(gamma_Hg-gamma_kero)

+//Pitot-static tube equation, V=[2*(pz1-pz2)/rho]^(1/2)

+V=(2*y*(g_Hg-g_kero)/rho_kero)^(1/2) //[ft/s]

+printf("\n The kerosene velocity in the pipe = %.1f ft/s.\n",V)
\ No newline at end of file
diff --git a/629/CH4/EX4.9/ex4_9.txt b/629/CH4/EX4.9/ex4_9.txt
new file mode 100644
index 000000000..96318a86d
--- /dev/null
+++ b/629/CH4/EX4.9/ex4_9.txt
@@ -0,0 +1,3 @@
+ 

+The velocity of air in the tunnel = 35.4 m/s.

+ 
\ No newline at end of file
diff --git a/629/CH4/EX4.9/example4_9.sce b/629/CH4/EX4.9/example4_9.sce
new file mode 100644
index 000000000..cf0c9d0e5
--- /dev/null
+++ b/629/CH4/EX4.9/example4_9.sce
@@ -0,0 +1,11 @@
+clear

+clc

+//Example 4.9 PITOT TUBE APPLICATION WITH PRESSURE GAGE

+p=98*10^3; //pressure[N/m^3]

+R=287; //gas constant[J/kg.K]

+T=20+273; //temperature[K]

+rho=p/(R*T) //density[kg/m^3]

+del_p=730; //[N/m^2]

+//Pitot-static tube equation,

+V=sqrt(2*del_p/rho) //velocity[m/s]

+printf("\nThe velocity of air in the tunnel = %.1f m/s.\n",V)
\ No newline at end of file