symba_frag_pos fixed angular momentum error reporting

MintonGroup · Jun 1, 2021 · f39d5cd · f39d5cd
1 parent 1ba5cde
commit f39d5cd
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/symba/symba_frag_pos.f90 b/src/symba/symba_frag_pos.f90
@@ -103,7 +103,7 @@ subroutine symba_frag_pos(param, symba_plA, family, x, v, L_spin, Ip, mass, radi
                write(*,*) 'Failed due to high energy error: ',(abs(dEtot) - Qloss) / Qloss
                lmerge = .true.
             else if (abs(dLmag) > Ltol) then
-               write(*,*) 'Failed due to high angular momentum error: ',(abs(dEtot) - Qloss) / Qloss
+               write(*,*) 'Failed due to high angular momentum error: ', dLmag
                lmerge = .true.
             end if
          end if