Thom discomfort index 

I have found the following formula in a Fortran program written by one of our colleagues.

```
ThomIndex = 0.4 * (AirTemperatureInCelsius + WetBulbTemperatureInCelsius) + 4.8 

ThomIndex ∈ ℕ
```