summaryrefslogtreecommitdiff
path: root/1379/CH13/EX13.1.4/example13_4.sce
diff options
context:
space:
mode:
Diffstat (limited to '1379/CH13/EX13.1.4/example13_4.sce')
-rwxr-xr-x1379/CH13/EX13.1.4/example13_4.sce20
1 files changed, 20 insertions, 0 deletions
diff --git a/1379/CH13/EX13.1.4/example13_4.sce b/1379/CH13/EX13.1.4/example13_4.sce
new file mode 100755
index 000000000..7ae7b1504
--- /dev/null
+++ b/1379/CH13/EX13.1.4/example13_4.sce
@@ -0,0 +1,20 @@
+
+
+//exapple 13.4
+clc; funcprot(0);
+// Initialization of Variable
+rhos=1455;//density of crystals
+rho=998;//density of wliquid
+g=9.81;
+pi=3.1428;
+mu=1.013/1000;
+omega=2*pi*60000/60;
+l=0.5;
+d=2*10^-6;//dia of particles
+r=50.5/1000;//radius
+t=38.5/1000;//thickness of liquid
+//calculation
+ri=r-t;
+V=pi*l*(r^2-ri^2);
+Q=d^2*(rhos-rho)/18/mu*omega^2*V/log(r/ri);
+disp(Q,"the maximum volumetric flow rate in (m^3/s):")