Fixed typo in OpenMP directive

MintonGroup · Nov 23, 2021 · 1052bd5 · 1052bd5
1 parent e08ed09
commit 1052bd5
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/kick/kick.f90 b/src/kick/kick.f90
@@ -190,7 +190,7 @@ module subroutine kick_getacch_int_all_triangular_pl(npl, nplm, x, Gmass, radius
          !$omp end parallel do
       else
          !$omp parallel do default(private) schedule(static)&
-         !$omp shared(npl, nplm, x, Gmass, radius) &
+         !$omp shared(npl, nplm, x, Gmass) &
          !$omp lastprivate(rji2, xr, yr, zr) &
          !$omp reduction(+:ahi) &
          !$omp reduction(-:ahj)