Fixed bad radius variable name

MintonGroup · Mar 8, 2023 · d6e5d08 · d6e5d08
1 parent 2ed8bc0
commit d6e5d08
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/encounter/encounter_check.f90 b/src/encounter/encounter_check.f90
@@ -852,7 +852,7 @@ module subroutine encounter_check_sweep_aabb_double_list(self, n1, n2, r1, v1, r
             iend =  self%aabb%iend(i) - 1_I8B
             nbox = iend - ibeg + 1
             ii = i - n1
-            call encounter_check_all_sweep_one(ii, nbox, r1(1,ii), r1(2,ii), r1(3,ii), v2(1,ii), v2(2,ii), v2(3,ii), &
+            call encounter_check_all_sweep_one(ii, nbox, r2(1,ii), r2(2,ii), r2(3,ii), v2(1,ii), v2(2,ii), v2(3,ii), &
                                                           xind(ibeg:iend), yind(ibeg:iend), zind(ibeg:iend),&
                                                           vxind(ibeg:iend), vyind(ibeg:iend), vzind(ibeg:iend), &
                                                           renc2(ii), rencind(ibeg:iend), dt, ext_ind(ibeg:iend), &