tx258/lammps-gran-kokkos
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

add missing entry to OpenMP reduction clause.

Browse Source
This commit is contained in:
Axel Kohlmeyer
2025-04-07 21:29:53 -04:00
parent dcb04032fb
commit fc3d295560
2 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/DIELECTRIC/pppm_dielectric.cpp
View File

@ -282,7 +282,7 @@ void PPPMDielectric::qsum_qsq(int warning_flag)
double qsqsume;
#if defined(_OPENMP)
#pragma omp parallel for default(shared) reduction(+:qsum_local,qsqsum_local)
#pragma omp parallel for default(shared) reduction(+:qsum_local,qsqsum_local,qsqsume_local)
#endif
for (int i = 0; i < nlocal; i++) {
qsum_local += q[i];

2
src/DIELECTRIC/pppm_disp_dielectric.cpp
View File

@ -556,7 +556,7 @@ void PPPMDispDielectric::qsum_qsq(int warning_flag)
double qsqsume;
#if defined(_OPENMP)
#pragma omp parallel for default(shared) reduction(+:qsum_local,qsqsum_local)
#pragma omp parallel for default(shared) reduction(+:qsum_local,qsqsum_local,qsqsume_local)
#endif
for (int i = 0; i < nlocal; i++) {
qsum_local += q[i];