crp/OpenMC
1
0
Fork 0
mirror of https://github.com/openmc-dev/openmc.git synced 2026-07-28 06:05:58 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

deallocating cmfd at end of run

Browse source
This commit is contained in:
Bryan Herman 2012-01-20 11:28:25 -05:00
parent eda0309e6e
commit 0029dabbef
1 changed files with 3 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/global.F90
View file

@ -237,6 +237,9 @@ contains
if (allocated(fission_bank)) deallocate(fission_bank)
if (allocated(source_bank)) deallocate(source_bank)
! Deallocate cmfd
if (allocated(cmfd)) deallocate(cmfd)
end subroutine free_memory
end module global