summaryrefslogtreecommitdiff
path: root/2159/CH11/EX11.8/118.sce
diff options
context:
space:
mode:
Diffstat (limited to '2159/CH11/EX11.8/118.sce')
-rwxr-xr-x2159/CH11/EX11.8/118.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/2159/CH11/EX11.8/118.sce b/2159/CH11/EX11.8/118.sce
new file mode 100755
index 000000000..5c94ac786
--- /dev/null
+++ b/2159/CH11/EX11.8/118.sce
@@ -0,0 +1,18 @@
+// problem 11.8
+L=1600
+H=550
+Dp=1.2
+d=0.18
+f=0.006
+Cv=0.97
+g=9.81
+V1=Cv*(sqrt(2*g*H))
+a=3.142*d*d/4
+Q=a*V1
+w=9810
+P=(w*Q*V1*V1)/(2*g*1000)
+ap=3.142*Dp*Dp/4
+Vp=Q/ap
+Hf=(4*f*L*Vp*Vp)/(Dp*2*g)
+Tp=4*w*Q*(H+Hf)/1000
+disp(Tp,P,"power to each jet in Kw,total power at reserviour i Kw")