diff options
Diffstat (limited to '3720/CH13/EX13.8/Ex13_8.sce')
| -rw-r--r-- | 3720/CH13/EX13.8/Ex13_8.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/3720/CH13/EX13.8/Ex13_8.sce b/3720/CH13/EX13.8/Ex13_8.sce new file mode 100644 index 000000000..2876940b0 --- /dev/null +++ b/3720/CH13/EX13.8/Ex13_8.sce @@ -0,0 +1,16 @@ +//Example 13_8
+clc;clear;
+// Given values
+y_1=3;// m
+y_2=1.5// m
+a=0.25// m
+b=6;// m
+g=9.81// m/s^2
+
+// Calculation
+x_1=y_1/a;//The depth ratio
+x_2=y_2/a;// The contraction coefficient
+//The corresponding discharge coefficient is determined from Fig. 13–38
+C_d=0.47;
+v=C_d*b*a*sqrt(2*g*y_1);
+printf('The rate of discharge,V=%0.2f m^3/s\n',v);
|