summaryrefslogtreecommitdiff
path: root/1457/CH15/EX15.3.a/15_3.sce
blob: 275e081f5d5fd59ae122b85b65bfdb11695bc076 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
clc
//Initialization of variables
cv=0.98
g=32.2
h=1320 //ft
A=0.196 //ft^2
eta=0.85
ne=400
phi=0.45
//calculations
V=cv*sqrt(2*g*h)
Q=A*V
bhp=eta*62.4*Q*h/550
ns=ne*sqrt(bhp) /h^(5/4)
u=phi*sqrt(2*g*h)
D=u*60/%pi/ne
//results
printf("Pitch diameter = %.2f ft",D)