Removed problematic status updates from spill methods

MintonGroup · Aug 24, 2021 · 3a1e58c · 3a1e58c
1 parent 55d4de3
commit 3a1e58c
Showing 1 changed file with 0 additions and 2 deletions.
diff --git a/src/util/util_spill.f90 b/src/util/util_spill.f90
@@ -281,7 +281,6 @@ module subroutine util_spill_body(self, discards, lspill_list, ldestructive)
          ! Therefore we need to set the nbody values for both the keeps and discareds
          discards%nbody = count(lspill_list(:))
          keeps%nbody = keeps%nbody - discards%nbody
-         if (keeps%nbody > size(keeps%status)) keeps%status(keeps%nbody+1:size(keeps%status)) = INACTIVE
       end associate
 
       return
@@ -316,7 +315,6 @@ module subroutine util_spill_encounter(self, discards, lspill_list, ldestructive
          ! Therefore we need to set the nenc values for both the keeps and discareds
          discards%nenc = count(lspill_list(:))
          keeps%nenc = count(.not.lspill_list(:)) 
-         if (size(keeps%status) > keeps%nenc) keeps%status(keeps%nenc+1:size(keeps%status)) = INACTIVE
       end associate
 
       return