summaryrefslogtreecommitdiff
path: root/2132/CH6/EX6.6/Example6_6.sce
blob: afd0d399713d6d31d7b7671aeb6c8b3b3caee6e9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
//Example 6.6
clc;
clear;
close;
format('v',7);
//Given data :
g=9.81;//constant
a=9*10^-4;//m^2
H=3;//meter
x=2.5;//meter
y=54/100;//meter
Qactual=250*10^-3/60;//Cumec
Qth=a*sqrt(2*g*H);//Cumec
Cd=Qactual/Qth;//coeff. of discharge
disp(Cd,"Coefficient of discharge : ");
Cv=sqrt(x^2)/sqrt(4*H*y);//velocity
disp(Cv,"Coefficient of velocity : ");
Cc=Cd/Cv;//coeff. of contraction
disp(Cc,"Coefficient of contraction : ");
//Answer in the book are not accurate.