diff options
Diffstat (limited to '1466/CH4/EX4.6/4_6.sce')
| -rwxr-xr-x | 1466/CH4/EX4.6/4_6.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/1466/CH4/EX4.6/4_6.sce b/1466/CH4/EX4.6/4_6.sce new file mode 100755 index 000000000..d163a67ab --- /dev/null +++ b/1466/CH4/EX4.6/4_6.sce @@ -0,0 +1,13 @@ +
+clc
+//initialisation of variables
+q= 12 //ft^3
+H1= 16 //ft
+A= 1500 //ft^2
+Q= 6 //ft^2/sec
+H2= 6 //ft
+//CALCULATIONS
+k= q/sqrt(H1)
+T= -(2*A/(k^2*60))*(Q*log((Q-k*sqrt(H2))/(Q-k*sqrt(H1)))+k*(sqrt(H2)-sqrt(H1)))
+//RESULTS
+printf (' Time required to lower the level of water = %.1f min',T)
|