initial commit / add all books

1 files changed, 26 insertions, 0 deletions

diff --git a/839/CH21/EX21.1/Example_21_1.sce b/839/CH21/EX21.1/Example_21_1.sce
new file mode 100755
index 000000000..a3c3e5fca
--- /dev/null
+++ b/839/CH21/EX21.1/Example_21_1.sce
@@ -0,0 +1,26 @@
+//clear//

+clear;

+clc;

+

+//Exapmle 21.1

+//Given

+yA = 0.20;

+yAi = 0.10;

+

+//Solution

+//(a)

+//Let A = Dv*rho_M/BT

+A = 1; //assumed

+

+//Using Eq.(21.19), for euilmolal diffusion,

+JA = A*(yA-yAi);

+//Form Eq.(21.24), for one way diffusion,

+NA = A*log((1-yAi)/(1-yA));

+NAbyJA = NA/JA;

+disp('In this case the transfer rate with one-way diffusion is',NAbyJA-1,'percent greater than that with equimolal diffusion');

+

+//(b) 

+//Whwn, b = BT/2

+A = A*2;

+yA = 1-exp(NA/2)*(1-yA)

+disp(yA,'The value of yA halfway through the layer for one-way diffusion is');