1 files changed, 20 insertions, 0 deletions
diff --git a/965/CH7/EX7.24/24.sci b/965/CH7/EX7.24/24.sci
new file mode 100644
index 000000000..98973af3c
--- /dev/null
+++ b/965/CH7/EX7.24/24.sci
@@ -0,0 +1,20 @@
+clc;
+clear all;
+disp("Boundary layer thickness")
+ta=20;//degree C
+U=1.8;//m/s
+L=0.6;//m
+rho=1.205;//kg/m^3
+mu=0.06533/3600;//kg/ms
+disp("boundary layer thickness by exact solution : del=5*(v*x/U)^0.5")
+disp("at the midpoint of the boundary layer y= del/2 occurs at ")
+disp("nu = y*(U/v*x)=2.5")
+disp("thus we get u/U =0.736")
+disp("m/s",U*0.736,"u =")
+ReL=rho*U*L/mu;
+delL=5*L/ReL^0.5;
+disp("m",delL,"The maximum boundary layer thickness, delL =")
+disp("The maximum value of normal component of velocity occurs at the outer edge of the boundary layer where u =U")
+//u/U*ReL^0.5=0.86;
+u=0.86*U/ReL^0.5;
+disp("m/s",u,"the maximum value of normal component of velocity at the trailing edge is ")