summaryrefslogtreecommitdiff
path: root/1268/CH7/EX7.5/7_5.sce
diff options
context:
space:
mode:
Diffstat (limited to '1268/CH7/EX7.5/7_5.sce')
-rw-r--r--1268/CH7/EX7.5/7_5.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/1268/CH7/EX7.5/7_5.sce b/1268/CH7/EX7.5/7_5.sce
new file mode 100644
index 000000000..93c2c0642
--- /dev/null
+++ b/1268/CH7/EX7.5/7_5.sce
@@ -0,0 +1,17 @@
+clc;
+disp("Example 7.5")
+delD= 250 // difference of the 2 densities in kg/m^3
+density= 1000 // of water in kg/m^3
+mew= 0.001 // in kg/ms
+d=1.25e-3 // in m
+e= 0.4 // porosity
+g=9.81
+phi=1
+// we get an equation for velocity
+// a*u^2+b*u+c=0 where we calculate a,b and c as----
+c=-g*delD
+b= (150*mew*(1-e))/(d*d*e*e*e*phi*phi)
+a=1.75*density/(phi*d*e*e*e)
+p=[a,b,c]
+z=roots(p)
+disp(z(2,1),"Fluidization velocity is ")