Calculate virtual temperature

.get_Tv(Temp, p, P, epsilon, unitless)

Arguments

Temp: Temperature in Kelvin
p: water vapour pressure in kPa
P: Atmospheric pressure in kPa
epsilon: ratio of water to air molar masses (unitless)
unitless: Logical. Should function use parameters with units? The function is faster when FALSE, but input must be in correct units or else results will be incorrect without any warning.

Value

Value in K of class units

Details

$$T_\mathrm{v} = T / [1 - (1 - \epsilon) (p / P)]$$

Eq. 2.35 in Monteith & Unsworth (2013)

Symbol	R	Description	Units	Default
$\epsilon$	`epsilon`	ratio of water to air molar masses	unitless	0.622
$p$	`p`	water vapour pressure	kPa	calculated
$P$	`P`	atmospheric pressure	kPa	101.3246

References

Monteith JL, Unsworth MH. 2013. Principles of Environmental Physics. 4th edition. Academic Press, London.

Examples


library(tealeaves)

cs <- make_constants()
ep <- make_enviropar()
lp <- make_leafpar()

T_leaf <- set_units(298.15, K)
p <- ep$RH * tealeaves:::.get_ps(T_leaf, ep$P, FALSE)
tealeaves:::.get_Tv(T_leaf, p, ep$P, cs$epsilon, FALSE)
#> 299.9208 [K]