Fixed incorrect index bug

MintonGroup · Jul 7, 2021 · 693bf2e · 693bf2e
1 parent 20dac50
commit 693bf2e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/helio/helio_getacch.f90 b/src/helio/helio_getacch.f90
@@ -86,7 +86,7 @@ subroutine helio_getacch_int_pl(pl, t)
                   faci = pl%Gmass(i) * irij3
                   facj = pl%Gmass(j) * irij3
                   pl%ahi(:,i) = pl%ahi(:,i) + facj * dx(:)
-                  pl%ahi(:,i) = pl%ahi(:,j) - faci * dx(:)
+                  pl%ahi(:,j) = pl%ahi(:,j) - faci * dx(:)
                end do
             end do
          end associate