A coupled thermo-mechanical damage model for granite. (March 2018)