More position tweaks to hit and run

MintonGroup · Feb 21, 2023 · 7845d71 · 7845d71
1 parent 49c9a72
commit 7845d71
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/fraggle/fraggle_generate.f90 b/src/fraggle/fraggle_generate.f90
@@ -390,7 +390,7 @@ module subroutine fraggle_generate_pos_vec(collider, nbody_system, param, lfailu
                fragments%rc(:,i) = fragments%rc(:,i) + fragment_cloud_center(:,j)
 
                if (lhitandrun) then
-                  fragments%rc(:,i) = fragments%rc(:,i) + (fragment_cloud_radius(j) + maxval(mass_rscale)) * impactors%bounce_unit(:) ! Shift the stretched cloud downrange
+                  fragments%rc(:,i) = fragments%rc(:,i) + 2 * fragment_cloud_radius(j) * mass_rscale(i) * impactors%bounce_unit(:) ! Shift the stretched cloud downrange
                else
                   ! Make sure that the fragments are positioned away from the impact point
                   direction = dot_product(fragments%rc(:,i) - impactors%rcimp(:), fragment_cloud_center(:,j) - impactors%rcimp(:))