diff options
Diffstat (limited to '629/CH4/EX4.8')
-rw-r--r-- | 629/CH4/EX4.8/ex4_8.txt | 3 | ||||
-rw-r--r-- | 629/CH4/EX4.8/example4_8.sce | 17 |
2 files changed, 20 insertions, 0 deletions
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 |