1 files changed, 12 insertions, 0 deletions
diff --git a/1394/CH18/EX18.2.1/Ex18_2_1.sce b/1394/CH18/EX18.2.1/Ex18_2_1.sce
new file mode 100755
index 000000000..9f6ea361b
--- /dev/null
+++ b/1394/CH18/EX18.2.1/Ex18_2_1.sce
@@ -0,0 +1,12 @@
+
+clc
+//initialization of variables
+p1 = 10^-10 // cm^3(stp)cm/cm^2-sec-cm-Hg
+c = 1/(22.4*10^3) // mol at stp /cc
+P = p1*c // for proper units
+R = 6240 // cmHg cm^3 //mol-K (gas constant)
+T = 298 // Kelvin
+//Calculations
+DH = P*R*T*10^9 // Permeability in x*10^-9 cm^2/sec
+//Results
+printf("The permeability is %.1f x10^-9 cm^2/sec",DH)