switch OpenMP pragma to default(shared), so it is compatible with all OpenMP standard versions
This commit is contained in:
@ -286,7 +286,7 @@ void KSpace::qsum_qsq(int warning_flag)
|
|||||||
double qsum_local(0.0), qsqsum_local(0.0);
|
double qsum_local(0.0), qsqsum_local(0.0);
|
||||||
|
|
||||||
#if defined(_OPENMP)
|
#if defined(_OPENMP)
|
||||||
#pragma omp parallel for default(none) reduction(+:qsum_local,qsqsum_local)
|
#pragma omp parallel for default(shared) reduction(+:qsum_local,qsqsum_local)
|
||||||
#endif
|
#endif
|
||||||
for (int i = 0; i < nlocal; i++) {
|
for (int i = 0; i < nlocal; i++) {
|
||||||
qsum_local += q[i];
|
qsum_local += q[i];
|
||||||
|
|||||||
Reference in New Issue
Block a user