diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /497/CH7/EX7.1/Chap7_Ex1.sce | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '497/CH7/EX7.1/Chap7_Ex1.sce')
-rwxr-xr-x | 497/CH7/EX7.1/Chap7_Ex1.sce | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/497/CH7/EX7.1/Chap7_Ex1.sce b/497/CH7/EX7.1/Chap7_Ex1.sce new file mode 100755 index 000000000..8b7cc2484 --- /dev/null +++ b/497/CH7/EX7.1/Chap7_Ex1.sce @@ -0,0 +1,25 @@ +//Kunii D., Levenspiel O., 1991. Fluidization Engineering(II Edition). Butterworth-Heinemann, MA, pp 491
+
+//Chapter-7, Example 1, Page 179
+//Title: Entrainment from Fine Particle Beds with High Freeboard
+//==========================================================================================================
+clear
+clc
+
+//INPUT
+rhog=5.51;//Density of gas in kg/m^3
+rhos=1200;//Density of solid in kg/m^3
+dpbar=130;//Average size of particles in micrometer
+uo=0.61;//Superficial gas velocity in m/s
+g=9.80;//Acceleration due to gravity in m/s^2
+
+//CALCULATION
+//Assuming that freeboard in higher than TDH, computation of entrainment rate by Zenz & Weil's method
+x=(uo^2)/(g*(dpbar*10^-6)*rhos^2);//Calculation of value of x-axis for Fig.(6), page 175
+y=1.2;// Value of y-axis from Fig.(6)
+Gsstar=y*rhog*uo;//Computation of rate of entrainment
+
+//OUTPUT
+mprintf('\nRate of entrainment=%fkg/m^2s',Gsstar);
+
+//====================================END OF PROGRAM ======================================================
\ No newline at end of file |