library(psychrolib)


HR=GetHumRatioFromRelHum(DB, RH, P)

H=GetMoistAirEnthalpy(DB, HR)