summaryrefslogtreecommitdiff
path: root/2132/CH6/EX6.11/Example6_11.sce
blob: d0ecad32f4b0c531fe742b32ddf749729944e4dc (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//Example 6.11
clc;
clear;
close;
format('v',8);
//Given data :
g=9.81;//constant
Cd=0.6;//Coefficient of discharge
B=1.3;//meter
H1=6-(1.8+1.5);//meter
H2=6-1.5;//meter
Q=2/3*Cd*B*sqrt(2*g)*(H2^(3/2)-H1^(3/2));//m^3/sec
disp(Q,"Discharge through the orifice in m^3/sec : ");