1 files changed, 16 insertions, 0 deletions
diff --git a/1394/CH9/EX9.1.1/Ex9_1_1.sce b/1394/CH9/EX9.1.1/Ex9_1_1.sce
new file mode 100755
index 000000000..7c5d24ee4
--- /dev/null
+++ b/1394/CH9/EX9.1.1/Ex9_1_1.sce
@@ -0,0 +1,16 @@
+
+clc
+//initialization of variables
+p1 = 10 // pressure in atm
+H = 600 // henrys constant in atm
+c1 = 0 // gmol/cc
+N1 = 2.3*10^-6 // mass flux in mol/cm^2-sec
+c = 1/18 //total Concentration in g-mol/cc
+D = 1.9*10^-5 // Diffusion co efficient in cm^2/sec
+//Calculations
+c1i = (p1/H)*c // Component concentration in gmol/cc
+k = N1/(c1i-c1)//Mass transfer co efficient in cm/sec
+l = D/k // Film thickness in cm
+//Results
+printf("The film thickness is %.5f cm",l)
+