diff --git a/src/swiftest/swiftest_discard.f90 b/src/swiftest/swiftest_discard.f90 index 707ed19ca..6af0c9a8f 100644 --- a/src/swiftest/swiftest_discard.f90 +++ b/src/swiftest/swiftest_discard.f90 @@ -41,7 +41,6 @@ module subroutine swiftest_discard_system(self, param) end if if (ltp_discards.or.lpl_discards) then - call nc%open(param) if (lpl_discards) then if (param%lenergy) call self%conservation_report(param, lterminal=.false.) call pl_discards%setup(0,param) @@ -49,7 +48,6 @@ module subroutine swiftest_discard_system(self, param) if (ltp_discards) then call tp_discards%setup(0,param) end if - call nc%close() end if end associate