blob: c49dac811a23406fe3c4f10925f8c5f2aed10131 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
//clc()
P = 3500;//kPa
T = 673.15;//K
SV = 0.08453;//m^3/kg
Vcondensed = 1/2;
m = 100;//kg
V = m * SV / (m/2);
//m*(Vl+Vg)*Vcondensed = m * SV
//But Vl is negligible,
Vg = m * SV / (m * Vcondensed);
//using steam table
T1 = 459.5;//K
P1 = 1158;//kPa
//internal energy of superheated steam from steam table
I = 2928.4;//kJ/kg
U1 = m * I;
Ul = 790;//kJ/kg
Ug = 2585.9;//kJ/kg
U2 = m*Vcondensed*Ul + m*(1-Vcondensed)*Ug;
Q = U2 - U1;
disp("kJ",Q,"The amount of heat removed fromt he system = ")
|
