Two modified symplectic partitioned Runge–Kutta methods for solving the elastic wave equation. (13th June 2017)