summaryrefslogtreecommitdiff
path: root/632/CH8/EX8.19/example8_19.sce
blob: e76f81a4b4e16951a85e40f9bee2151690e336ff (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//clc()
Tw = 313;//K
Td = 333;//K
//Using th psychometric chart,
Y = 0.04;//kg water/ kg dry air
PS = 26.5;//%
VS = 1.18;//m^3/kg dry air ( volume of saturated air )
VD = 0.94;//m^3/kg dry air ( volume of dry air )
VH = VD + PS * (VS - VD )/100;
HS = 470;//J / kg dry air ( enthalpy of saturated air )
HD = 60;//J / kg dry air ( enthalpy of dry air )
H = HD + PS * ( HS - HD )/100;
disp("kg water/ kg dry air",Y,"(a)Absolute Humidity of the air = ")
disp("%",PS,"(b)Percent humidity = ")
disp("m^3/kg dry air",VH,"(c)Humid volume = ")
disp("kJ/kg dry air",H,"(d)Enthalpy of wet air = ")