Heat load index

[martin-macek]

Heat load index is artifitially restricted by a value of 1, which has no basis in index definition from McCune and Keon (2002).
Problematic part of the code, which limits values to 1:
return(ifelse(h > 1, 1, h))