A Fast Sweeping Scheme for Calculating P Wave First-Arrival Travel Times in Transversely Isotropic Media with an Irregular Surface