summaryrefslogtreecommitdiff
path: root/3720/CH11/EX11.3/Ex11_3.sce
blob: 9a2371dac8029aee5975652158f821862a296d3e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
//Example 11_3
clc;clear;funcprot(0);
//Assumptions
Re_cr=5*10^5;
//Properties
rho=876;//The density of engine oil at 40°C kg/m^3
nu=2.485*10^-4;//m^2/s
//Given values
V=2;// Free stream velocity in m/s
L=5;// m
b=1;//m

//Calculation
Re_L=(V*L)/nu;// The Reynolds number at the end of the plate
C_f=1.328*Re_L^(-0.5);// The average friction coefficient
A=L*b;// m^2
F_d=C_f*A*rho*(V^2/2);// N
printf('The drag force,F_d =%0.0f N\n',F_d);