Skip to content
Snippets Groups Projects
Commit 335409c6 authored by JanThorbecke's avatar JanThorbecke
Browse files

bug fix for source on surface with multiple threads

parent a88b8787
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
fdelmodc/sourceOnSurface.c
+ 1
− 1
View file @ 335409c6
...@@ -306,7 +306,7 @@ int reStoreSourceOnSurface(modPar mod, srcPar src, bndPar bnd, int ixsrc, int iz ...@@ -306,7 +306,7 @@ int reStoreSourceOnSurface(modPar mod, srcPar src, bndPar bnd, int ixsrc, int iz
/* restore source positions on the edge */ /* restore source positions on the edge */
is0 = -1*floor((src.n-1)/2); is0 = -1*floor((src.n-1)/2);
#pragma omp for private (isrc, ixs, izs, store) //#pragma omp for private (isrc, ixs, izs, store)
for (isrc=0; isrc<src.n; isrc++) { for (isrc=0; isrc<src.n; isrc++) {
/* calculate the source position */ /* calculate the source position */
if (src.random || src.multiwav) { if (src.random || src.multiwav) {
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment