summaryrefslogtreecommitdiff
path: root/629/CH5/EX5.7/example5_7.sce
diff options
context:
space:
mode:
Diffstat (limited to '629/CH5/EX5.7/example5_7.sce')
-rw-r--r--629/CH5/EX5.7/example5_7.sce13
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