summaryrefslogtreecommitdiff
path: root/3733/CH4/EX4.9/Ex4_9.sce
blob: 821e44c8861fc676f2698b2895e750796b57f534 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
//Example 4_9
clc;funcprot(0);
//Given data
Q=30;//m^/sec
H=7.5;// m
n_t=0.85;
N=50;///r.p.m
Sr=0.85;//Speed ratio
g=9.81;//The acceleration due to gravity in m/s^2

//Calculation
w=1000*9.81;// N
P_t=(w*Q*H*n_t)/1000;// kW
N_s=(N*sqrt(P_t))/(H)^(5/4);//Specific speed
if(N_s>=174)
    printf('\n (a)As N_s=340,two turbine units can be used.\n (b)The runner is of Francis type.');
else
    printf('\n Wrong');
end
D=Sr*60*(sqrt(2*g*H))*(1/(%pi*N));//The diameter of the runner in m
printf('\n (c)The diameter of the runner,D=%0.2f m',D);
// The answer vary due to round off error