diff options
| author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
|---|---|---|
| committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
| commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
| tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /1040/CH7/EX7.4/Chapter7_Ex4.sce | |
| parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
| download | Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2 Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip | |
initial commit / add all books
Diffstat (limited to '1040/CH7/EX7.4/Chapter7_Ex4.sce')
| -rw-r--r-- | 1040/CH7/EX7.4/Chapter7_Ex4.sce | 52 |
1 files changed, 52 insertions, 0 deletions
diff --git a/1040/CH7/EX7.4/Chapter7_Ex4.sce b/1040/CH7/EX7.4/Chapter7_Ex4.sce new file mode 100644 index 000000000..7b8932178 --- /dev/null +++ b/1040/CH7/EX7.4/Chapter7_Ex4.sce @@ -0,0 +1,52 @@ +//Harriot P.,2003,Chemical Reactor Design (I-Edition) Marcel Dekker,Inc.,USA,pp 436
+//Chapter-7 Ex7.4 Pg No.279
+//Title:Local selectivity due to mass transfer limitations
+//===========================================================================================================
+clear
+clc
+//INPUT
+C_Ai=0.02;//(M)
+C_B0=3;//(M)
+D_A=10^(-5);//(cm2/sec)
+D_B=D_A;//(cm2/sec)
+D_C=D_B;//(cm2/sec)
+k_1=10^(4);//(L/mol sec)
+k_star_l=0.015;//(cm/sec)
+n=1;
+C_c0=[0 1.4];
+X=[0 0.5]// Conversion
+Phi=[33 23];//From figure 7.7
+
+
+//CALCULATION
+k_2=0.09*k_1;
+for i=1:2
+ C_B(i)=(1-X(i))*C_B0;
+sqrt_M(i)=sqrt(C_B(i)*k_1*D_A)/k_star_l;
+Phi_a(i)=(1+(C_B(i)/(n*C_Ai))*(D_B/D_A));//Refer equation 7.51
+C_Bbar_by_C_B(i)=(Phi(i)/sqrt_M(i))^2;//Refer equation 7.59
+delta_C_B(i)=(1-C_Bbar_by_C_B(i))*C_B(i);//Refer equation 7.60
+delta_C_c(i)=delta_C_B(i);
+C_cbar(i)=delta_C_c(i)+C_c0(i);
+C_Bbar(i)=C_Bbar_by_C_B(i)*(C_B(i));
+S(i)=(1-(k_2*C_cbar(i)/(C_Bbar(i)*k_1)))*100;//Refer equation 7.56
+end
+
+//OUTPUT
+mprintf('\n\tLocal selectivity due to mass transfer limitations ');
+mprintf('\n\tThe local selectivity for Zero Conversion : %0.0f%%',S(1));
+mprintf('\n\tThe local selectivity for 50%% Conversion : %0.0f%%',S(2));
+
+//FILE OUTPUT
+fid= mopen('.\Chapter7-Ex4-Output.txt','w');
+mfprintf(fid,'\n\tLocal selectivity due to mass transfer limitations ');
+mfprintf(fid,'\n\tThe local selectivity for Zero Conversion is %0.0f%%',S(1));
+mfprintf(fid,'\n\tThe local selectivity for 50%% Conversion is %0.0f%%',S(2));
+mclose(fid);
+//======================================================END OF PROGRAM===================================================
+
+
+
+
+
+
|