GetVapPresFromTDewPoint Function

public function GetVapPresFromTDewPoint(TDewPoint) result(VapPres)

Return vapor pressure given dew point temperature. References: ASHRAE Handbook - Fundamentals (2017) ch. 1 eqn 36

Arguments

Type IntentOptional AttributesName
real, intent(in) :: TDewPoint

Dew-point temperature in °F [IP] or °C [SI]

Return Value real

Partial pressure of water vapor in moist air in Psi [IP] or Pa [SI]


Calls

proc~~getvappresfromtdewpoint~~CallsGraph proc~getvappresfromtdewpoint GetVapPresFromTDewPoint proc~getsatvappres GetSatVapPres proc~getvappresfromtdewpoint->proc~getsatvappres proc~isip isIP proc~getsatvappres->proc~isip proc~gettrankinefromtfahrenheit GetTRankineFromTFahrenheit proc~getsatvappres->proc~gettrankinefromtfahrenheit proc~gettkelvinfromtcelsius GetTKelvinFromTCelsius proc~getsatvappres->proc~gettkelvinfromtcelsius

Contents


Source Code

  function GetVapPresFromTDewPoint(TDewPoint) result(VapPres)
    !+ Return vapor pressure given dew point temperature.
    !+ References:
    !+ ASHRAE Handbook - Fundamentals (2017) ch. 1 eqn 36

    real, intent(in)  ::  TDewPoint
      !+ Dew-point temperature in °F [IP] or °C [SI]
    real              ::  VapPres
      !+ Partial pressure of water vapor in moist air in Psi [IP] or Pa [SI]

    VapPres = GetSatVapPres(TDewPoint)
  end function GetVapPresFromTDewPoint