diff options
Diffstat (limited to '1379/CH11/EX11.1.2/example11_2.sce')
-rwxr-xr-x | 1379/CH11/EX11.1.2/example11_2.sce | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/1379/CH11/EX11.1.2/example11_2.sce b/1379/CH11/EX11.1.2/example11_2.sce new file mode 100755 index 000000000..f168716fc --- /dev/null +++ b/1379/CH11/EX11.1.2/example11_2.sce @@ -0,0 +1,27 @@ +
+
+//exapple 11.2
+clc; funcprot(0);
+// Initialization of Variable
+d=50/1000000;
+rhos=1850;//density of particle
+rho=880;//density of hydrocarbon
+mu=2.75/1000;//viscosity of hydrocarbon
+e=0.45;//void fraction coeff.
+g=9.81;
+h=1.37;//flow depth
+c=5.5/1000;//c=1/K
+//calculation
+//part 1
+u=c*e^3*d^2*g*(rhos-rho)/mu/(1-e);
+disp(u,"The superficial linear flow rate in (m/s):")
+//part 2
+u=d^2*g*(rhos-rho)/18/mu;
+disp(u,"Terminal Settling Velocity in (m/s):");
+Re=d*u*rho/mu;
+if Re<2 then
+ disp("Stoke law assumption is sustained with this velocity")
+end
+//part 3
+P=g*(rhos-rho)*h*(1-e);
+disp(P,"Pressure drop across fluidised bed in (N/m^2):");
|