summaryrefslogtreecommitdiff
path: root/2789/CH9/EX9.2/Ex9_2.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2789/CH9/EX9.2/Ex9_2.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '2789/CH9/EX9.2/Ex9_2.sce')
-rwxr-xr-x2789/CH9/EX9.2/Ex9_2.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/2789/CH9/EX9.2/Ex9_2.sce b/2789/CH9/EX9.2/Ex9_2.sce
new file mode 100755
index 000000000..7d8d9947e
--- /dev/null
+++ b/2789/CH9/EX9.2/Ex9_2.sce
@@ -0,0 +1,17 @@
+clear;
+clc;
+
+//page no. 285
+
+T = 100;// degreeF
+d = 3;// inches
+Re = 80000;// Reynolds number
+e = 0.006;// inches
+l = 1000;//feet
+f1 = 0.021;//friction factor
+nu = 0.729*10^-5;// sqft/sec
+V = Re*nu/0.25;
+h_L1 = f1*(l/0.25)*(V^2 /(2*32.2));
+f = 0.316/Re^0.25;
+h_L = (f/f1)*h_L1;
+printf('Head loss expected = %.1f ft\n and head loss expected if the pipe were smooth = %.2f ft',h_L1,h_L);