summaryrefslogtreecommitdiff
path: root/1187/CH8/EX8.4/4.sce
blob: 8eb24280ec9b1f759aa25c7cd4949fe352e0f62d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
clc

v=1.5*10^(-5); // m^2/s
Re_t=5*10^5;
x_t=1.2; // m
rho=1.21; // kg/m^3

u_m=v*Re_t/x_t;

disp("(a) the velocity of the airstream =")
disp(u_m)
disp("m/s")

theta=0.646*x_t/sqrt(Re_t);

F=rho*u_m^2*theta;

D_F=2*F*x_t;

disp("(b) the frictional drag of the plate, D_F =")
disp(D_F)
disp("N")