summaryrefslogtreecommitdiff
path: root/1268/CH5
diff options
context:
space:
mode:
Diffstat (limited to '1268/CH5')
-rw-r--r--1268/CH5/EX5.5/5_5.sce5
-rw-r--r--1268/CH5/EX5.6/5_6.sce5
-rw-r--r--1268/CH5/EX5.7/5_7.sce12
3 files changed, 22 insertions, 0 deletions
diff --git a/1268/CH5/EX5.5/5_5.sce b/1268/CH5/EX5.5/5_5.sce
new file mode 100644
index 000000000..395114163
--- /dev/null
+++ b/1268/CH5/EX5.5/5_5.sce
@@ -0,0 +1,5 @@
+clc;
+disp("Example 5.5")
+// WE need to calculate the integral of the manipulated expression in terms of y/delta
+int= integrate('2*y-(5*y*y)+(4*y*y*y)-(y*y*y*y)','y',2,1)
+disp(int, "Momentum thickness is ")
diff --git a/1268/CH5/EX5.6/5_6.sce b/1268/CH5/EX5.6/5_6.sce
new file mode 100644
index 000000000..33b0ee33b
--- /dev/null
+++ b/1268/CH5/EX5.6/5_6.sce
@@ -0,0 +1,5 @@
+clc;
+disp("Example 5.6")
+Rex=5e5
+Re=5.5*(Rex^0.5)
+disp(Re,"Reynolds number based on boundary layer thickness is approximately ")
diff --git a/1268/CH5/EX5.7/5_7.sce b/1268/CH5/EX5.7/5_7.sce
new file mode 100644
index 000000000..57d3a9b26
--- /dev/null
+++ b/1268/CH5/EX5.7/5_7.sce
@@ -0,0 +1,12 @@
+clc;
+disp("Example 5.7")
+U=12 // in m/s
+l=1.5 // length of the plate
+x=l/8
+v=1.8e-5
+density= 1.2
+Re=U*x/v
+m=x*((280/(13*Re))^0.5)
+disp(m,"Boundary layer thickness at 1/8th of the plate distance from the leading edge is ")
+tau=3*density*v*U/(2*m)
+disp(tau,"The wall shear stress is ")