summaryrefslogtreecommitdiff
path: root/632/CH8/EX8.15/example8_15.sce
blob: ac7a3a192ee67eff73561c40bc975867518e1325 (plain)
1
2
3
4
5
6
7
8
9
10
11
//clc()
Td = 353.2;//K
Tw = 308;//K
Hvap = 2418.5;//kJ/kg
pr = 0.950;//kJ/kg
Ps = 5.62;//kPa
P = 101.3;//kPa
Yw1 = (Ps * 18)/ (( P - Ps) * 29);
Y1 = Yw1 - pr * ( Td - Tw ) / Hvap;
disp("kg water/kg dry air",Y1,"Humidity = ")
//humidity can also be directly obtained from psychometric chart, which we get to be 0.018 kg water/kg dry air