diff options
Diffstat (limited to '629/CH5/EX5.7/example5_7.sce')
-rw-r--r-- | 629/CH5/EX5.7/example5_7.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/629/CH5/EX5.7/example5_7.sce b/629/CH5/EX5.7/example5_7.sce new file mode 100644 index 000000000..2f0afbc59 --- /dev/null +++ b/629/CH5/EX5.7/example5_7.sce @@ -0,0 +1,13 @@ +clear
+clc
+//Example 5.7 DEPRESSURIZATION OF GAS IN TANK
+V=10; //volume[m^3]
+po=500; //initial pressure[kPa]
+pf=400; //final pressure[kPa]
+R=518; //gas constant[J/kg.K]
+T=300; //[K]
+A=10^-7; //area[m^2]
+//mi=0,mo=0.66*p*A/sqrt(R*T), mcv=mi-mo
+//continuity equation, mi=V*d(rho)/dt
+t=integrate('-V*(0.66*A*p*sqrt(R*T))^(-1)','p',po,pf)
+printf("\nThe time elapsed for the absolute pressure drop = %.f s.\n",t)
\ No newline at end of file |