• R/O
  • SSH

treelm: Commit

Repository of the treelm library.


Commit MetaInfo

Revision2f316dd775e15fa3965be32916714f2ff2d1d6bd (tree)
Time2019-08-29 17:49:37
AuthorDaniel Fleischer <daniel.fleischer@stud...>
CommiterDaniel Fleischer

Log Message

Deallocate vrtx%refine if it is allocated in the no-qval case

Change Summary

Incremental Difference

diff -r 9a79a2b03f04 -r 2f316dd775e1 source/tem_vrtx_module.f90
--- a/source/tem_vrtx_module.f90 Thu Aug 22 10:39:32 2019 +0200
+++ b/source/tem_vrtx_module.f90 Thu Aug 29 10:49:37 2019 +0200
@@ -387,6 +387,7 @@
387387 vrtx%maxVertices = 0
388388
389389 if (allocated(treeID)) deallocate(treeID)
390+ if (allocated(vrtx%refine)) deallocate(vrtx%refine)
390391
391392 if( present( subTree ))then
392393 local_nElems = subTree%nElems
Show on old repository browser