Initialized Mslr to 0 in the case that we got a merge

MintonGroup · Feb 23, 2023 · 09547ec · 09547ec
1 parent d466f96
commit 09547ec
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/collision/collision_regime.f90 b/src/collision/collision_regime.f90
@@ -288,6 +288,7 @@ subroutine collision_regime_LS12_SI(Mcb, m1, m2, rad1, rad2, rh1, rh2, vb1, vb2,
       Msmall = Mtot - Mbig
       if (Msmall < min_mfrag) then
          regime = COLLRESOLVE_REGIME_MERGE
+         Mslr = 0.0_DP
       else
          Mslr_hitandrun = max(calc_Qrd_rev(Msmall, Mbig, Mint, den1, den2, Vimp, c_star), min_mfrag)
          if (regime == COLLRESOLVE_REGIME_HIT_AND_RUN ) then