blob: 3ceccdeda21d53816db8fa4f6ebfee7b066a534b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
//pathname=get_absolute_file_path('7.19.sce')
//filename=pathname+filesep()+'7.19-data.sci'
//exec(filename)
//From steam tables:
vg=0.12736
vf=0.001157
p205=1.7230
p195=1.3978
T=200+273
hfga=1940.7
//Value of vfg(in m^3/kg):
vfg=vg-vf
//Value of dp/dT(in MPa/K):
r=(p205-p195)/(205-195)
//By Clapeyron equation(in kJ/kg):
hfg=T*vfg*r*10^3
printf("\nRESULT")
printf("\nCalculated enthalpy of vaporization = %f kJ/kg",hfg)
printf("\nEnthalpy of vaporization from steam table = %f kJ/kg",hfga)
|
