summaryrefslogtreecommitdiff
path: root/812/CH6/EX6.05
diff options
context:
space:
mode:
Diffstat (limited to '812/CH6/EX6.05')
-rwxr-xr-x812/CH6/EX6.05/6_05.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/812/CH6/EX6.05/6_05.sce b/812/CH6/EX6.05/6_05.sce
new file mode 100755
index 000000000..c72c372cf
--- /dev/null
+++ b/812/CH6/EX6.05/6_05.sce
@@ -0,0 +1,11 @@
+//flow//
+pathname=get_absolute_file_path('06.05.sce')
+filename=pathname+filesep()+'06.05-data.sci'
+exec(filename)
+//Velocity of flow at the exit(in ft/sec):
+V2=sqrt(2*g*(Du-Dd/12))
+//Volume flow rate/width(ft^2/sec):
+Q=V2*Dd/12
+printf("\n\nRESULTS\n\n")
+printf("\n\nVelocity of flow at the exit: %.3f ft/sec\n\n",V2)
+printf("\n\nVolume flow rate/width: %.3f ft^2/sec\n\n",Q)