summaryrefslogtreecommitdiff
path: root/2021/CH12/EX12.1/EX12_1.sce
blob: 00a62a9a9db6b8fe0b79fd9529f3bf11cf97b8c3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//Finding the type of boundary
//Given
ks=0.20*10^-3;
tau=7.848;
nu=0.01*10^-4;
rho=1000;
//To Find
v=sqrt(tau/rho);
R=(v*ks)/nu;
disp("R ="+string(R)+" no units");
if(R>4);
if(R<60);
disp("Flow is Transitional");