We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 95bf97f commit 0d626fbCopy full SHA for 0d626fb
1 file changed
src/Solution/ParticleTracker/Particle/ParticleTracks.f90
@@ -128,8 +128,6 @@ end subroutine init_buffer
128
subroutine destroy(this)
129
class(ParticleTracksType) :: this
130
call this%buffer%destroy()
131
- if (allocated(this%buffer)) deallocate (this%buffer)
132
- if (allocated(this%files)) deallocate (this%files)
133
end subroutine destroy
134
135
!> @brief Grow the array of track files.
0 commit comments