diff --git a/fdelmodc/applySource.c b/fdelmodc/applySource.c index 3aeb972c1404aaa91a8e9b3edf17685edea4e40a..6a4bc66092247cc09e0057ae92261e96307c5d63 100644 --- a/fdelmodc/applySource.c +++ b/fdelmodc/applySource.c @@ -89,7 +89,10 @@ int applySource(modPar mod, srcPar src, wavPar wav, bndPar bnd, int itime, int i ix = src.x[isrc] + ibndx; iz = src.z[isrc] + ibndz; } - else { /* plane wave and point sources */ + else if (src.plane) {/* plane wave sources */ + ix = ixsrc + ibndx + src.x[isrc]; + iz = izsrc + ibndz + src.z[isrc]; + else { /* point sources */ ix = ixsrc + ibndx + is0 + isrc; iz = izsrc + ibndz; }