powered by
Removes extraneous other-phase from a pick file. If Ypix were made initially as a rough pick, this removes them.
Y2Pphase(twpx, phase)
WPX list
character, phase to exchange to P
WPX returned without other-phases
Initially many events may be picked using GPIX button. These should be removed after the P-phases have been determined with PickWin.
PPIX, GPIX, YPIX, PickWin
# NOT RUN { newwpx = Y2Pphase(twpx, "G" ) # } # NOT RUN { # }
Run the code above in your browser using DataLab