diff options
Diffstat (limited to '2066/CH7/EX7.13/7_13.sce')
| -rwxr-xr-x | 2066/CH7/EX7.13/7_13.sce | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/2066/CH7/EX7.13/7_13.sce b/2066/CH7/EX7.13/7_13.sce new file mode 100755 index 000000000..cecc01551 --- /dev/null +++ b/2066/CH7/EX7.13/7_13.sce @@ -0,0 +1,19 @@ +clc
+clear
+//Initialization of variables
+V61=10.8 //ft/s
+V81=6.05 //ft/s
+r0=3 //in
+e=0.00015
+d1=6 //in
+rho=1.94 //slugs/ft^3
+mu=2.34e-5 //ft-lb/s^2
+//calculations
+roe=r0/(12*e)
+Nr1=V61*(d1/12)*rho/mu
+f6=0.0165
+V6=11.6 //ft/s
+V8=6.52 //ft/s
+Q=V6*%pi/4 *(d1/12)^2
+//results
+printf("Discharge = %.2f ft^3/s",Q)
|