summaryrefslogtreecommitdiff
path: root/1268/CH6/EX6.5
diff options
context:
space:
mode:
Diffstat (limited to '1268/CH6/EX6.5')
-rw-r--r--1268/CH6/EX6.5/6_5.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/1268/CH6/EX6.5/6_5.sce b/1268/CH6/EX6.5/6_5.sce
new file mode 100644
index 000000000..0cc6778f0
--- /dev/null
+++ b/1268/CH6/EX6.5/6_5.sce
@@ -0,0 +1,11 @@
+clc;
+disp("Example 6.5")
+d=3e-4 // diameter in m
+particleD=2800 // inkg/m^3
+waterD=1000 // in kg/m^3
+mew= 0.001 // viscosity in kg/ms
+K=d*(((waterD*9.81*(particleD-waterD))/(mew*mew))^(1/3))
+Re= d*waterD/mew
+f=18.5/(Re^0.6)
+U=(((4*9.81*(particleD-waterD)*d)/(3*waterD*f))^0.5)^(10/7)
+disp(U)