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

WS15

parent f3c774a3
No related branches found
No related tags found
No related merge requests found
...@@ -23,6 +23,12 @@ utils/makewave ...@@ -23,6 +23,12 @@ utils/makewave
utils/mat2su utils/mat2su
utils/syn2d utils/syn2d
utils/green3D utils/green3D
utils/HomG
utils/MuteSnap
utils/Snap2Shot
utils/combine
utils/combine_induced
utils/reshape_su
fdelmodc/fdelmodc fdelmodc/fdelmodc
include/genfft.h include/genfft.h
Make_include Make_include
...@@ -48,4 +54,5 @@ marchenko_applications/iba ...@@ -48,4 +54,5 @@ marchenko_applications/iba
marchenko_applications/marchenko_app marchenko_applications/marchenko_app
marchenko_applications/reshape_su marchenko_applications/reshape_su
raytime3d/raytime3d raytime3d/raytime3d
raytime/Raytime
MDD/mdd MDD/mdd
...@@ -173,11 +173,11 @@ nw, int nw_low, int nw_high, int mode, int reci, int nshots, int *ixpos, int np ...@@ -173,11 +173,11 @@ nw, int nw_low, int nw_high, int mode, int reci, int nshots, int *ixpos, int np
for (j = 0; j < nts; j++) for (j = 0; j < nts; j++)
iRN[l*size+ixsrc*nts+j] += rtrace[j]*scl*dx; iRN[l*size+ixsrc*nts+j] += rtrace[j]*scl*dx;
} /* end of parallel Nfoc loop */ } /* end of Nfoc loop */
if (verbose>4) vmess("*** Shot gather %d processed ***", k); if (verbose>4) vmess("*** Shot gather %d processed ***", k);
} /* end of nshots (k) loop */ } /* end of nparallel shots (k) loop */
free(sum); free(sum);
free(rtrace); free(rtrace);
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment