A correction function to determine the β-fusion heat in a mixture of α- and β-PP