summaryrefslogtreecommitdiff
path: root/1962/CH7/EX7.1/example7_1.sce
blob: 061c4d4920255739397e30206017d21fb0e55709 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

//example 7.1
//page 245
clc; funcprot(0);
//initialisation of variable
mug=8620/10000;//viscosity of glycerine
nuw=0.804*10^-6//kinematic viscosity of water
S=1.26;
rhog=995.7;//density of glycerine
rhow=1000;//density of water
D=0.02;
V=0.3;
Rw=V*D/nuw;
disp(Rw,"reynolds number of water flow");
disp("reynolds number greater than 2000 so flow turbulent");
Rg=V*D/mug*rhog;
disp(Rg,"reynolds number of glycerine flow");
disp("reynolds number less than 2000 so flow laminar");
clear