summaryrefslogtreecommitdiff
path: root/1268/CH4/EX4.18/4_18.sce
diff options
context:
space:
mode:
Diffstat (limited to '1268/CH4/EX4.18/4_18.sce')
-rw-r--r--1268/CH4/EX4.18/4_18.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/1268/CH4/EX4.18/4_18.sce b/1268/CH4/EX4.18/4_18.sce
new file mode 100644
index 000000000..2a496cefb
--- /dev/null
+++ b/1268/CH4/EX4.18/4_18.sce
@@ -0,0 +1,14 @@
+clc;
+disp("Example 4.18")
+density=850 // in kg/m^3
+mew= 0.0005 // in kg/ms
+d= 0.0525 // diameter in m
+G= 7620 // in kg/m^2/s
+U=G/density
+Re=800000
+f= 0.0014+(0.125/(Re^0.32))
+v= mew/density
+m= 5*v/(U*((f/2)^0.5))
+disp(m,"Laminar sub layer thickness is")
+tau= f*density*U*U/2
+disp(tau,"Wall shear stress is ")