summaryrefslogtreecommitdiff
path: root/2420/CH9/EX9.8/9_8.sce
blob: d6c93ece68b72b0de60af63592a86df0ebf81650 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
clc
clear
//Initialization of variables
mdot=8000 //lb/min
A1=1 //sq ft
A2=3/4 //sq ft
P2=50 //psi
P1=10 //psi
gam=62.4 //lb/ft^3
y2=-2 //ft
y1=-4 //ft
g=32.2 //ft/s^2
eff=0.7
//calculations
v=1/gam
cap=mdot/8.33
V1=mdot*v/A1 /60
V2=mdot*v/A2 /60
ht= (y2-y1) + (V2^2 -V1^2)/(2*g) + (P2-P1)*144/gam
Hhp=mdot*ht/33000
Php=Hhp/eff
//results
printf("Capacity = %d gpm",cap)
printf("\n Total dynamic head = %.1f ft",ht)
printf("\n Hydraulic hp = %.1f hp",Hhp)
printf("\n pump hp = %.1f hp",Php)