Home > atmlab > h2o > thermodynamics > latent_heat_vaporization.m

latent_heat_vaporization

PURPOSE ^

LATENT_HEAT_VAPORIZATION latent heat vaporization lv

SYNOPSIS ^

function lv = latent_heat_vaporization(T)

DESCRIPTION ^

 LATENT_HEAT_VAPORIZATION latent heat vaporization lv

    Latent heat of vaporization is the energy required to 
    transform a given quantity of water into vapor.

 FORMAT    Lwater = latent_heat_vaporization(T)
        
 OUT   lv   latent heat of vaporization [K]
 IN    T   air temperature [K], it can be a scalar or a vector

 EXAMPLE:
       Te = equivalent_temperature(50, 298, 100000)
       Te = 322.6981

 ACCURACY: 
           LATENT_HEAT_VAPORIZATION gives a very good approximation of lv

 Reference: An Introduction to Atmospheric Thermodynamics
            A. A. Tsonis, Cambridge University Press, 2007
            Page 87, Eq. 6.13

 2009-08-15   Created by Isaac Moradi.

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

DOWNLOAD ^

latent_heat_vaporization.m

SOURCE CODE ^

0001 function lv = latent_heat_vaporization(T)
0002 % LATENT_HEAT_VAPORIZATION latent heat vaporization lv
0003 %
0004 %    Latent heat of vaporization is the energy required to
0005 %    transform a given quantity of water into vapor.
0006 %
0007 % FORMAT    Lwater = latent_heat_vaporization(T)
0008 %
0009 % OUT   lv   latent heat of vaporization [K]
0010 % IN    T   air temperature [K], it can be a scalar or a vector
0011 %
0012 % EXAMPLE:
0013 %       Te = equivalent_temperature(50, 298, 100000)
0014 %       Te = 322.6981
0015 %
0016 % ACCURACY:
0017 %           LATENT_HEAT_VAPORIZATION gives a very good approximation of lv
0018 %
0019 % Reference: An Introduction to Atmospheric Thermodynamics
0020 %            A. A. Tsonis, Cambridge University Press, 2007
0021 %            Page 87, Eq. 6.13
0022 %
0023 % 2009-08-15   Created by Isaac Moradi.
0024 
0025 % set constants
0026 lv0 = constants( 'LATENT_HEAT_VAPORIZATION'); 
0027 cpv = constants( 'VAPOR_HEAT_CAPA_CONST_PRES');
0028 cpw = constants( 'WATER_HEAT_CAPA_CONST_PRES');
0029 
0030 % calculate latent heat
0031 lv = lv0 + (cpv - cpw) .* (T - 273);

Generated on Mon 15-Sep-2014 13:31:28 by m2html © 2005