GetHumRatioFromTDewPoint Function

public function GetHumRatioFromTDewPoint(TDewPoint, Pressure) result(HumRatio)

Return humidity ratio given dew-point temperature and pressure. Reference: ASHRAE Handbook - Fundamentals (2017) ch. 1

Arguments

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

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

real, intent(in) :: Pressure

Atmospheric pressure in Psi [IP] or Pa [SI]

Return Value real

Humidity ratio in lb_H₂O lb_Air⁻¹ [IP] or kg_H₂O kg_Air⁻¹ [SI]


Calls

proc~~gethumratiofromtdewpoint~~CallsGraph proc~gethumratiofromtdewpoint GetHumRatioFromTDewPoint proc~gethumratiofromvappres GetHumRatioFromVapPres proc~gethumratiofromtdewpoint->proc~gethumratiofromvappres proc~getsatvappres GetSatVapPres proc~gethumratiofromtdewpoint->proc~getsatvappres proc~isip isIP proc~getsatvappres->proc~isip proc~gettrankinefromtfahrenheit GetTRankineFromTFahrenheit proc~getsatvappres->proc~gettrankinefromtfahrenheit proc~gettkelvinfromtcelsius GetTKelvinFromTCelsius proc~getsatvappres->proc~gettkelvinfromtcelsius

Called by

proc~~gethumratiofromtdewpoint~~CalledByGraph proc~gethumratiofromtdewpoint GetHumRatioFromTDewPoint proc~gettwetbulbfromtdewpoint GetTWetBulbFromTDewPoint proc~gettwetbulbfromtdewpoint->proc~gethumratiofromtdewpoint proc~calcminimaldxheating CalcMinimalDXHeating proc~calcminimaldxheating->proc~gethumratiofromtdewpoint proc~calcpsychrometricsfromtdewpoint CalcPsychrometricsFromTDewPoint proc~calcpsychrometricsfromtdewpoint->proc~gethumratiofromtdewpoint proc~simminimaldxheating SimMinimalDXHeating proc~simminimaldxheating->proc~calcminimaldxheating

Contents


Source Code

  function GetHumRatioFromTDewPoint(TDewPoint, Pressure) result(HumRatio)
    !+ Return humidity ratio given dew-point temperature and pressure.
    !+ Reference:
    !+ ASHRAE Handbook - Fundamentals (2017) ch. 1

    real, intent(in)  ::  TDewPoint
      !+ Dew-point temperature in °F [IP] or °C [SI]
    real, intent(in)  ::  Pressure
      !+ Atmospheric pressure in Psi [IP] or Pa [SI]
    real              ::  HumRatio
      !+ Humidity ratio in lb_H₂O lb_Air⁻¹ [IP] or kg_H₂O kg_Air⁻¹ [SI]
    real              ::  VapPres
      !+ Partial pressure of water vapor in moist air in Psi [IP] or Pa [SI]

    VapPres   = GetSatVapPres(TDewPoint)
    HumRatio  = GetHumRatioFromVapPres(VapPres, Pressure)
  end function GetHumRatioFromTDewPoint