blob: d4bc6c6b82e1434156b161ff2d4e70567121d7bd (
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
27
28
29
30
|
clc;clear;
//Example 7.14
//given data
P1=3000;// in kPa
T1=400;
P2=50;
T2=100;
Wout=2000;//in kW
//from Table A-6
//at P1
h1=3231.7;
s1=6.9235;
//at 2a
h2a=2682.4;
//from Table A-6
//at 2s
s2s=s1;
sf=1.0912;
sg=7.5937;
hf=340.54;
hfg=2304.7
x2s=(s2s-sf)/(sg-sf);
h2s=hf+x2s*hfg;
nT=(h1-h2a)/(h1-h2s);
disp(nT,'isentropic efficiency is')
//Ein = Eout
m=Wout/(h1-h2a);
disp(m,'mass flow rate in kg/s')
|
