weiwem - one depth step of wave equation migration
ierr=weiwem(iws,izs,ifk,ith,wfld)
current frequency slice
current depth slice
current fk operation
current thread
complex(:,:,:,:,:)
wavefield
Wave Equation Migration operator
sepweif90
L<weiwem_init> L<weicam>