summaryrefslogtreecommitdiff
path: root/1187/CH7/EX7.5
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1187/CH7/EX7.5
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 '1187/CH7/EX7.5')
-rwxr-xr-x1187/CH7/EX7.5/5.sce28
1 files changed, 28 insertions, 0 deletions
diff --git a/1187/CH7/EX7.5/5.sce b/1187/CH7/EX7.5/5.sce
new file mode 100755
index 000000000..f15ef340c
--- /dev/null
+++ b/1187/CH7/EX7.5/5.sce
@@ -0,0 +1,28 @@
+clc
+
+disp("(a) Feed is at the end of the main")
+Q0=4.5*10^-3; // m^3/s
+d=0.1; // m
+l=4.5*10^3; // m
+g=9.81; // m/s^2
+f=0.006;
+rho=1000; // kg/m^3
+
+u0=Q0/(%pi/4*d^2);
+h_f=4*f*u0^2*l/3/(d*2*g);
+
+dp=h_f*rho*g;
+disp("Pressure difference =")
+disp(dp)
+disp("N/m^2")
+
+disp("(b) Feed is at the centre of the main")
+
+Q0_b=Q0/2;
+u0_b=u0/2;
+l_b=l/2;
+
+dp_b=(u0_b/u0)^2*(l_b/l)*dp;
+disp("Pressure difference =")
+disp(dp_b)
+disp("N/m^2") \ No newline at end of file