Permalink
Browse files

Change size_t to long in OpenMP loops of scfgrad

  • Loading branch information...
raimis committed Sep 6, 2018
1 parent 93b044d commit 0ce22d3175971d2ec084b585b3f312c542baed71
Showing with 2 additions and 2 deletions.
  1. +2 −2 psi4/src/psi4/scfgrad/jk_grad.cc
@@ -2252,7 +2252,7 @@ std::map<std::string, std::shared_ptr<Matrix> > DirectJKGrad::compute1(std::vect
double** Dbp = Db_->pointer();
#pragma omp parallel for num_threads(nthreads) schedule(dynamic)
for (size_t index = 0L; index < npairs2; index++) {
for (long int index = 0L; index < npairs2; index++) {
size_t PQ = index / npairs;
size_t RS = index % npairs;
@@ -2501,7 +2501,7 @@ std::map<std::string, std::shared_ptr<Matrix> > DirectJKGrad::compute2(std::vect
double** Dbp = Db_->pointer();
#pragma omp parallel for num_threads(nthreads) schedule(dynamic)
for (size_t index = 0L; index < npairs2; index++) {
for (long int index = 0L; index < npairs2; index++) {
size_t PQ = index / npairs;
size_t RS = index % npairs;

0 comments on commit 0ce22d3

Please sign in to comment.