Added missing variable to openmp list

MintonGroup · Sep 17, 2021 · 1e9794a · 1e9794a
1 parent cc97508
commit 1e9794a
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/kick/kick.f90 b/src/kick/kick.f90
@@ -168,7 +168,7 @@ module subroutine kick_getacch_int_all_tp(ntp, npl, xtp, xpl, GMpl, lmask, acc)
       integer(I4B) :: i, j
 
       !$omp parallel do default(private) schedule(static)&
-      !$omp shared(npl, ntp, lmask, xtp, xpl) &
+      !$omp shared(npl, ntp, lmask, xtp, xpl, GMpl) &
       !$omp reduction(-:acc)
       do i = 1, ntp
          if (lmask(i)) then