blob: b3c7c72ecc6fb310307ec8bff179db827030aaae (
plain)
1
2
3
4
5
6
7
8
9
10
|
//clc()
Hv1 = 2256;//kJ/kg
T1 = 373;//K
T2 = 473;//K
Tc = 647;//K
Tr1 = T1 / Tc;
Tr2 = T2 / Tc;
//Hv2 / Hv1 = ((1-Tr2)/(1-Tr1))^0.38
Hv2 = Hv1*(((1-Tr2)/(1-Tr1))^0.38);
disp("kJ/kg",Hv2,"Latent heat of vaporization of water at 473K = ")
|