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/CH3/EX3.6/Chapter3_Ex6.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/CH3/EX3.6/Chapter3_Ex6.sce')
| -rw-r--r-- | 1040/CH3/EX3.6/Chapter3_Ex6.sce | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/1040/CH3/EX3.6/Chapter3_Ex6.sce b/1040/CH3/EX3.6/Chapter3_Ex6.sce new file mode 100644 index 000000000..ff22274fe --- /dev/null +++ b/1040/CH3/EX3.6/Chapter3_Ex6.sce @@ -0,0 +1,36 @@ +//Harriot P.,2003,Chemical Reactor Design (I-Edition) Marcel Dekker,Inc.,USA,pp 436.
+//Chapter-3 Ex3.6 Pg No. 114
+//Title: Optimum reaction temperature
+//===========================================================================================================
+clear
+clc
+//INPUT
+del_H=-20*10^3;//Heat of reaction(cal)
+T_eq=[500 700];//Equivalent temperatures (K)
+R=1.987;//Gas Constant (cal/mol K)
+E2_by_E1=2;//Ratio of activation energy
+
+//CALCULATION
+T_opt(1)=T_eq(1)/(1+(log(E2_by_E1)*(R/(-del_H)))*T_eq(1));//Refer equation 3.63 Pg No. 113
+T_opt(2)=T_eq(2)/(1+(log(E2_by_E1)*(R/(-del_H)))*T_eq(2));
+delta_T(1)=T_eq(1)-T_opt(1);
+delta_T(2)=T_eq(2)-T_opt(2);
+
+
+//OUTPUT
+mprintf('\n \t \t Temperature_1\t Temperature_2 ');
+mprintf('\n \t \t==================================');
+mprintf('\n(T_eq - T_opt)(K): \t%0.0f \t\t%0.0f',delta_T(1),delta_T(2));
+mprintf('\n T_opt(K):\t \t%0.0f\t\t%0.0f', T_opt(1),T_opt(2));
+
+fid= mopen('.\Chapter3-Ex6-Output.txt','w');
+mfprintf(fid,'\n \t \t Temperature_1\t Temperature_2 ');
+mfprintf(fid,'\n \t \t==================================');
+mfprintf(fid,'\n(T_eq - T_opt)(K): \t%0.0f \t\t%0.0f',delta_T(1),delta_T(2));
+mfprintf(fid,'\n T_opt(K):\t \t%0.0f\t\t%0.0f', T_opt(1),T_opt(2));
+mclose(fid);
+
+//=========================================================END OF PROGRAM=====================================
+//Disclaimer:There is an arithmetic error in the optimum temperatures obtained in the textbook.
+// Based on the values (T_eq - T_opt)1=17 and (T_eq - T_opt)2=32 the optimum temperatures obtained are
+// T_opt1=483 K and T_opt2=668 K respectively.
|