diff --git a/src/io/io_conservation_report.f90 b/src/io/io_conservation_report.f90 index 350dba858..820569bd3 100644 --- a/src/io/io_conservation_report.f90 +++ b/src/io/io_conservation_report.f90 @@ -48,7 +48,6 @@ module subroutine io_conservation_report(t, symba_plA, npl, j2rp2, j4rp4, param, Eorbit_now = ke_orbit_now + ke_spin_now + pe_now Ltot_now(:) = Lorbit_now(:) + Lspin_now(:) + Lescape(:) Mtot_now = dMcb + sum(mass(2:npl)) + Mcb_initial + Mescape - Ltot_now(:) = Lescape(:) + Ltot_now(:) if (lfirst) then Eorbit_orig = Eorbit_now Mtot_orig = Mtot_now