symba_frag_pos removed unneeded energy after scaling

MintonGroup · Jun 4, 2021 · e73f9d7 · e73f9d7
1 parent 515b00c
commit e73f9d7
Showing 1 changed file with 0 additions and 7 deletions.
diff --git a/src/symba/symba_frag_pos.f90 b/src/symba/symba_frag_pos.f90
@@ -182,13 +182,6 @@ subroutine set_scale_factors()
       ke_orbit_before = ke_orbit_before / Escale
       Ltot_before = Ltot_before / Lscale
       Lmag_before = Lmag_before / Lscale
-      Etot_after = Etot_after / Escale
-      pe_after = pe_after / Escale
-      ke_spin_after = ke_spin_after / Escale
-      ke_orbit_after = ke_orbit_after / Escale
-      Ltot_after = Ltot_after / Lscale
-      Lmag_after = Lmag_after / Lscale
-
 
       return
    end subroutine set_scale_factors