diff options
Diffstat (limited to '1394/CH8/EX8.5.2/Ex8_5_2.sce')
| -rwxr-xr-x | 1394/CH8/EX8.5.2/Ex8_5_2.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/1394/CH8/EX8.5.2/Ex8_5_2.sce b/1394/CH8/EX8.5.2/Ex8_5_2.sce new file mode 100755 index 000000000..b66d06a84 --- /dev/null +++ b/1394/CH8/EX8.5.2/Ex8_5_2.sce @@ -0,0 +1,15 @@ + +clc +//initialization of variables +Dl=1.9*10^-5// Diffusion co efficient for liquid phase in cm^2/sec +Dg = 0.090 //Diffusion co efficient for gas phase in cm^2/sec +R = 82 // Gas constant in cm^3-atm/g-mol-K +T = 363 //Temperature in Kelvin +H1 = 0.70 // Henrys constant in atm +c = 1/97 // concentration of water in g-mol/cm^3 +//Calculations +kl = (Dl/0.01)*c // m.t.c in liquid phase in mol/cm^2/sec +kp = (Dg/0.1)/(R*T)// m.t.c in gas phase in gmol/cm^2-sec-atm +KL = 1/((1/kl)+(1/(kp*H1)))*10^5// Overall m.t.c in x*10^-5 mol/cm^2-secliquid phase +//Results +printf("The overall m.t.c in liquid side is %.2f x10^-5 mol/cm^2-sec",KL)// answer wrong in textbook |