summaryrefslogtreecommitdiff
path: root/389/CH8/EX8.9/Example8_9.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /389/CH8/EX8.9/Example8_9.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '389/CH8/EX8.9/Example8_9.sce')
-rwxr-xr-x389/CH8/EX8.9/Example8_9.sce36
1 files changed, 36 insertions, 0 deletions
diff --git a/389/CH8/EX8.9/Example8_9.sce b/389/CH8/EX8.9/Example8_9.sce
new file mode 100755
index 000000000..40345e67c
--- /dev/null
+++ b/389/CH8/EX8.9/Example8_9.sce
@@ -0,0 +1,36 @@
+clear;
+clc;
+
+// Illustration 8.9
+// Page: 327
+
+printf('Illustration 8.9 - Page: 327\n\n');
+
+// solution
+
+//****Data****//
+// C1=CH4 C2=C2H6 C3=n-C3H8 C4=C4H10
+Abs=0.15;// [Total absorption,kmol]
+T=25;// [OC]
+y1=0.7;// [mol fraction]
+y2=0.15;// [mol fraction]
+y3=0.10;// [mol fraction]
+y4=0.05;// [mol fraction]
+x1=0.01;// [mol fraction]
+x_involatile=0.99;// [mol fraction]
+L_by_G=3.5;// [mol liquid/mol entering gas]
+//******//
+
+LbyG_top=L_by_G/(1-y2);
+LbyG_bottom=(L_by_G+y2)/1;
+LbyG_av=(LbyG_top+LbyG_bottom)/2;
+// The number of eqb. trays is fixed by C3 absorption:
+// For C3 at 25 OC;
+m=4.10;
+A=LbyG_av/m;
+Frabs=0.7;// [Fractional absorption]
+X0=0;
+// From Eqn. 8.109:
+deff('[y]=f43(Np)','y=Frabs-((A^Np)-A)/((A^Np)-1)');
+Np=fsolve(2,f43);
+printf("Number of trays required is %f \n",Np); \ No newline at end of file