blob: 895917d3a2ec5a3480c987f56b1ea8eda5e922ab (
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
|
clear;
clc;
disp('Example 4.16');
// aim : To determine
// the minimum dryness fraction of steam
// Given values
P1 = 1.8;// testing pressure,[MN/m^2]
P2 = .11;// pressure after throttling,[MN/m^2]
// solution
// from steam table
// at .11 MN/m^2 steam is completely dry and specific enthalpy is
hg = 2680;// [kJ/kg]
// before throttling steam is wet, so specific enthalpy is=hf+x*hfg, where x is dryness fraction
// from steam table
hf = 885;// [kJ/kg]
hfg = 1912;// [kJ/kg]
// now for throttling process,specific enthalpy will same before and after
// hence
x = (hg-hf)/hfg;
mprintf('\n The minimum dryness fraction of steam is x = %f \n',x);
// End
|