summaryrefslogtreecommitdiff
path: root/839/CH29/EX29.1/Example_29_1.sce
blob: 8bbceb12cbdf4ddc3ef2b74d0d7bdc739ed5100f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//clear//
clear;
clc;

//Example 29.1
//Given
mdot = 100; //[ton/h]
w1 = 0.80;
w2 = 0.80;
//Solution
Wi = 12.74; //From Table 29.1
Dpa = 2*25.4; //[mm]
Dpb = 0.125*25.4; //[mm]
//Using Eq.(29.10)
P = mdot*0.3162*Wi*(1/Dpb^0.5-1/Dpa^0.5); //[kW]
disp('kW',P,'Power required (P) = ');