summaryrefslogtreecommitdiff
path: root/51/CH8/EX8.11
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /51/CH8/EX8.11
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 '51/CH8/EX8.11')
-rwxr-xr-x51/CH8/EX8.11/8_11.sce20
1 files changed, 20 insertions, 0 deletions
diff --git a/51/CH8/EX8.11/8_11.sce b/51/CH8/EX8.11/8_11.sce
new file mode 100755
index 000000000..154d279f4
--- /dev/null
+++ b/51/CH8/EX8.11/8_11.sce
@@ -0,0 +1,20 @@
+clc;
+clear;
+Pa=50;//hp
+D=1;//ft
+l=300;//ft
+f=0.02;
+z1=90;//ft
+//energy equation between the surface of the lake and the outlet of the pipe
+//p1=V1=p2=z2=0; V2=V
+//hL=f*l*(V^2)/(D *2*g)
+//hT=Pa/(sw*%pi*(D^2)*V/4)
+c1=(Pa*550)/(62.4*%pi*(D^2)/4)//561
+c2=f*l/(D*2*32.2)//0.0932
+fn=poly([c1 (-z1) 0 ((1/(2*32.2))+(c2))],"V","c");
+r=roots(fn);
+V1=r(1);//ft/sec
+V2=r(2);//ft/sec
+Q1=(%pi*(D^2)/4)*V1;//(ft^3)/sec
+Q2=(%pi*(D^2)/4)*V2;//(ft^3)/sec
+disp("(ft^3)/sec",Q2,"and","(ft^3)/sec",Q1,"The possible flowrates are=") \ No newline at end of file