Migration code for seismic event location