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/CH6/EX6.1.a/Chapter6_Ex1_a.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/CH6/EX6.1.a/Chapter6_Ex1_a.sce')
| -rw-r--r-- | 1040/CH6/EX6.1.a/Chapter6_Ex1_a.sce | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/1040/CH6/EX6.1.a/Chapter6_Ex1_a.sce b/1040/CH6/EX6.1.a/Chapter6_Ex1_a.sce new file mode 100644 index 000000000..6a4e827c1 --- /dev/null +++ b/1040/CH6/EX6.1.a/Chapter6_Ex1_a.sce @@ -0,0 +1,31 @@ +//Harriot P., 2003, Chemical Reactor Design (I-Edition), Marcel Dekker, Inc., USA, pp 436.
+//Chapter-6 Ex6.1.a Pg No.236
+//Title:Power Consumption per unit volume at 300rpm
+//====================================================================================================================
+clear
+clc
+//INPUT
+D_a=0.1;
+D_t=0.3;
+H=0.3;
+N_P=5.5;
+rho=1000;
+n=5;
+S_f=6;//Scale up factor in diameter
+//CALCULATION
+P_unit_vol=(N_P*n^3*D_a^5)/(%pi*(1/4)*D_t^2*H);
+P_thousand_gal=P_unit_vol*5.067;
+t=(4/n)*(D_t/D_a)^2*(H/D_t);
+P_unit_vol_new=S_f^2*P_thousand_gal;
+
+//OUTPUT
+//Console Output
+mprintf('\n The Power consumption per unit volume at 300rpm = %.2f HP/1000 gal',P_thousand_gal);
+mprintf('\n\ The Power consumption scaling up sixfold in diameter = %.0f HP/1000 gal',P_unit_vol_new);
+
+//File Output
+fid= mopen('.\Chapter6_Ex1_a_Output.txt','w');
+mfprintf(fid,'\n The Power consumption per unit volume at 300rpm = %.2f HP/1000 gal',P_thousand_gal);
+mfprintf(fid,'\n\ The Power consumption scaling up sixfold in diameter = %.0f HP/1000 gal',P_unit_vol_new);
+mclose(fid);
+//======================================================END OF PROGRAM=================================================
|