summaryrefslogtreecommitdiff
path: root/2507/CH10/EX10.11/Ex10_11.sce
blob: 9e3d63eb66708e4e410bc93ded065d5bbff6bedd (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
clc
clear
printf("Example 10.11 | Page number 360 \n\n");
//Find the heat rejected from steam
//Given data
p1 = 2 //bar
v1 = 0.624 //m^3/kg
t = 120.23 //°C
m = 0.16 //kg
//Solution
vf = 0.001061 //m^3/kg
vg = 0.8857 //m^3/kg
x1 = (v1-vf)/(vg-vf) //Dryness fraction
hf = 504.68 //kJ/kg
hg = 2706.6 //kJ/kg
h1 = (1-x1)*hf + x1*hg //kJ/kg
u1 = h1 - p1*v1*100//kJ/kg

v2 = v1 //m^3/kg
vf = 0.001044 //m^3/kg
vg = 1.673 //m^3/kg
x2 = (v1-vf)/(vg-vf) //Dryness fraction
hf = 419 //kJ/kg
hg = 2676 //kJ/kg
h2 = (1-x2)*hf + x2*hg //kJ/kg
p2 = 1.010325 //bar
u2 = h2 - p2*v2*100 //kJ/kg
 
printf("Heat rejected from steam = %.1f kJ",m*(u2-u1))