diff options
Diffstat (limited to '629/CH6/EX6.12/example6_12.sce')
| -rw-r--r-- | 629/CH6/EX6.12/example6_12.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/629/CH6/EX6.12/example6_12.sce b/629/CH6/EX6.12/example6_12.sce new file mode 100644 index 000000000..5c8c05bc1 --- /dev/null +++ b/629/CH6/EX6.12/example6_12.sce @@ -0,0 +1,16 @@ +clear
+clc
+//Example 6.12 PRESSURE RISE DUE TO WATER HAMMER EFFECT
+rho=1.94; //[slugs/ft^3]
+Ev=3.2*10^5; //[lbf/in^2]
+V=4; //[ft/s]
+//Sound speed
+c=sqrt(Ev*144/rho) //[ft/s]
+L=3000; //[ft]
+tc=2*L/c //[s]
+//Closure time of 1sec is less than tc
+//Pressure rise
+delp=rho*V*c/144 //[psi]
+pi=40; //initial pressure[psi]
+pmax=pi+delp //[psi]
+printf("\n The maximum pressure that develops at the downstream end = %.f psig.\n",pmax)
\ No newline at end of file |