function T = aat(Ta, v, h)
%AAT  Australian Apparent Temperature
%   T = aat(Ta, v, h) returns the apparent temperature T given the
%   air temperature Ta in degrees Celcius, wind velocity v in m/s,
%   and the relative humidity h.

p = 6.105 * h * exp(17.27 * Ta / (237.7 + Ta));
T = Ta + 0.33 * p - 0.7 * v - 4;

end
