diff options
Diffstat (limited to '812/CH6/EX6.05')
-rwxr-xr-x | 812/CH6/EX6.05/6_05.sce | 11 |
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)
|