calcTotalHeating function

Calculate Total Heating