A closed-form solution for the 3D steady-state thermoporoelastic field in an infinite transversely isotropic rock weakened by an elliptical crack