summaryrefslogtreecommitdiff
path: root/1373/CH6/EX6.7/Chapter6_Example7.sce
blob: a3ba4bc21df50e18a8ba87b2cb9c76e14398e71a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//Chapter-6, Example 6.7, Page 257
//=============================================================================
clc
clear

//INPUT DATA
D=0.02;//I.D of the tube in m
Q=1.5;//Flow rate in litres per minute
k=(1*10^-6);//kinematic viscosity in m^2/s

//CALCULATIONS
um=((Q/60)*10^-3)/(3.14*(D^2/4));//Average velocity in m/s
Re=(um*D)/k;//Reynolds number
x=0.05*D*Re;//Entry length in m

//OUTPUT
mprintf('Since Re which is %3.0f less than 2300, the flow is laminar. \n Entry length is %3.3f m',Re,x)

//=================================END OF PROGRAM==============================