From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 .../EX14.4/14_4_Helium_Gas_spherical_container.sce   | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100644 534/CH14/EX14.4/14_4_Helium_Gas_spherical_container.sce

(limited to '534/CH14/EX14.4/14_4_Helium_Gas_spherical_container.sce')

diff --git a/534/CH14/EX14.4/14_4_Helium_Gas_spherical_container.sce b/534/CH14/EX14.4/14_4_Helium_Gas_spherical_container.sce
new file mode 100644
index 000000000..46db4f06d
--- /dev/null
+++ b/534/CH14/EX14.4/14_4_Helium_Gas_spherical_container.sce
@@ -0,0 +1,20 @@
+clear;
+clc;
+printf('FUNDAMENTALS OF HEAT AND MASS TRANSFER \n Incropera / Dewitt / Bergman / Lavine \n EXAMPLE 14.4   Page 902 \n')// Example 14.4
+
+// The rate of change of the helium pressure dp/dt
+
+D = .2             ;//[m] Diameter
+L = 2*10^-3        ;//[m] Thickness
+p = 4              ;//[bars] Helium Pressure
+T = 20+273         ;//[K] Temperature
+//Table A.8 helium-fused silica (293K) Page 952
+Dab = .4*10^-13        ;//[m^2/s] Diffusion coefficient
+//Table A.10 helium-fused silica (293K)
+S = .45*10^-3        ;//[kmol/m^3.bar] Solubility
+
+// By applying the species conservation Equation 14.43 and 14.62
+dpt = -6*(.08314)*T*(Dab)*S*p/(L*D);
+
+printf('\n The rate of change of the helium pressure dp/dt %.2e bar/s',dpt);
+//END
\ No newline at end of file
-- 
cgit