A thermomagnetoelastic model of the earthquake source mechanism