Dew Point

$$ t_m = 0.0 \\ t_k = T+273.15 \\ t_n = t_k \\ e_s = 10^{9.4051-\frac{2353}{t_k}} \\ e_o = 0.01rh*e_s \\ t_s = 1.0 \\ \text{do} $$

$$ e_p = \frac{5417.98 e_s}{t_n^2} \\ t_n = t_n + \frac{e_o-e_s}{e_p} \\ t_s = |t_m-t_n| \\ t_m = t_n \\ e_s = 10^{9.4051-\frac{2353}{t_n}} $$

$$ \text {while} (t_s >= 0.005) \\ d_d = t_k-t_n \\ T_d = t_k - 273.15-d_d \\ \\ if (T_d > T) \quad T_d = T $$