summaryrefslogtreecommitdiff
path: root/1052/CH13/EX13.4/134.sce
blob: e1376b86dacfd9a6470088235222a52c25a89d57 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
clc;
//Example 13.4
//page no 138
printf(" Example 13.4 page no 138\n\n ");
//an air conducting duct has a rectangular cross section
w=1//width of rectangular section 
h=0.25//height of rectangular section
D=2*w*h/(w+h)//equivalent or hydraulic diameter
printf("\n hydraulic diameter D=%f m",D)
R_e=2300//critical reynolds no
neu=1e-5//kinematic viscosity of air
v=R_e*neu/D//velocity
printf("\n velocity of air v=%f m/s",v);