1 files changed, 17 insertions, 0 deletions
diff --git a/536/CH10/EX10.8/Example_10_8.sce b/536/CH10/EX10.8/Example_10_8.sce
new file mode 100755
index 000000000..343f2a9a0
--- /dev/null
+++ b/536/CH10/EX10.8/Example_10_8.sce
@@ -0,0 +1,17 @@
+clc;
+clear;
+
+printf("Example 10.8\n")
+
+L=825e-3; //length of the tube
+d=15e-3; //diameter of the tube
+P_i=7.5e3; //Partial pressure of ammonia at inlet
+P_o=2e3; //Partial pressure of ammonia at inlet
+A_r=2e-5; //Air rate
+P=101.3e3; //Atmospheric pressure
+
+D_F_m=(P_i-P_o)/log(P_i/P_o);//Mean driving force
+A_absorbd=A_r*((P_i/(P-P_i))-(P_o/(P-P_o)));
+A_w=%pi*d*L;//Wetted surface
+K_G=(A_absorbd/(A_w*D_F_m));//Overall transfer coefficient
+printf("\n Overall Transfer coefficient = %.2f * 10^-9 kmol/[m^2 s (N/m^2)]",K_G*1e9)
+\ No newline at end of file