diff --git a/src/cmfd_header.F90 b/src/cmfd_header.F90 index 3d7786ab8e..73bc0e0163 100644 --- a/src/cmfd_header.F90 +++ b/src/cmfd_header.F90 @@ -194,6 +194,7 @@ contains if (allocated(this % dom)) deallocate(this % dom) if (allocated(this % k_cmfd)) deallocate(this % k_cmfd) if (allocated(this % entropy)) deallocate(this % entropy) + if (allocated(this % resnb)) deallocate(this % resnb) end subroutine deallocate_cmfd