Artifact reduction in pseudo-acoustic modeling by pseudo-source injection

I provide a framework for deriving fast finite-difference algorithms for the numerical modeling of acoustic wave propagation in anisotropic media. I deploy it in the case of transversely isotropic media to implement a kinematically accurate fast finite-difference modeling method. This results in a significant reduction of the shear artifacts compared to similar kinematically accurate finite-difference methods.