From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 3720/CH8/EX8.2/Ex8_2.sce | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)
 create mode 100644 3720/CH8/EX8.2/Ex8_2.sce

(limited to '3720/CH8/EX8.2/Ex8_2.sce')

diff --git a/3720/CH8/EX8.2/Ex8_2.sce b/3720/CH8/EX8.2/Ex8_2.sce
new file mode 100644
index 000000000..e4db34edc
--- /dev/null
+++ b/3720/CH8/EX8.2/Ex8_2.sce
@@ -0,0 +1,26 @@
+//Example 8_2
+clc;clear;funcprot(0);
+// Given values
+rho=62.42;//lbm/ft^3
+mu=1.038*10^-3;// lbm/ft.s
+D=0.01;// ft
+L=30;// ft
+V_avg=3;// ft/s
+g=32.2;// Ft/s^2
+
+//Calculation
+//(a)
+Re=(rho*V_avg*D)/mu;// Reynolds number
+f=64/Re;// Friction factor
+h_l=f*(L/D)*((V_avg^2)/(2*g));// ft
+printf('(a)The head loss,h_l =%0.1f ft\n',h_l);
+//(b)
+gradP_l=(f*(L/D)*rho*(V_avg^2/2))/32.2;// lbf/ft^2
+gradP_1=(gradP_l/144);// psi
+printf('(b)The pressure drop,gradP_l=%0.0f lbf/ft^2=%0.2f psi\n',gradP_1*144,gradP_1);
+//(c)
+A_c=(%pi*D^2)/4;// ft^2
+v=V_avg*A_c;// ft^3/s
+W_pump=v*gradP_l/0.737;// W
+printf('(c)The pumping power requirements,W_pump=%0.2f W\n',W_pump);
+// The answer vary due to round off error
-- 
cgit