An experimental and theoretical stress-strain-damage correlation procedure for constitutive modelling of granite. (April 2019)