• R/O
  • SSH

treelm: 提交

Repository of the treelm library. Now found at https://github.com/apes-suite/treelm


Commit MetaInfo

修訂be8e137a8a018495285b7ba2bf702d59967ca8a6 (tree)
時間2023-05-09 00:11:12
作者Gregspi <gregoriogerardo.spinelli@dlr....>
CommiterGregspi

Log Message

Force using tracking table when map2global is empty

Change Summary

差異

diff -r 6a41ca7ffeab -r be8e137a8a01 source/tem_shape_module.f90
--- a/source/tem_shape_module.f90 Mon May 08 14:19:03 2023 +0200
+++ b/source/tem_shape_module.f90 Mon May 08 17:11:12 2023 +0200
@@ -548,7 +548,7 @@
548548
549549 countPoints = 0
550550 call init(me=grwPnts)
551- if ( storePnts .and. (map2global%nVals > 0) ) then
551+ if ( storePnts ) then
552552 select case (trim(me%kind))
553553 case ('canoND')
554554 call tem_cano_storePntsInSubTree( me = me%canoND(:), &
diff -r 6a41ca7ffeab -r be8e137a8a01 source/tem_tracking_module.f90
--- a/source/tem_tracking_module.f90 Mon May 08 14:19:03 2023 +0200
+++ b/source/tem_tracking_module.f90 Mon May 08 17:11:12 2023 +0200
@@ -553,7 +553,8 @@
553553
554554 ! get rid of the empty track in order to avoid empty writes to disk
555555 if ( me%instance(iLog)%subTree%useGlobalMesh .or. &
556- & ( me%instance(iLog)%subTree%nElems > 0 ) ) then
556+ & ( me%instance(iLog)%subTree%nElems > 0 ) .or. &
557+ & ( me%instance(iLog)%subTree%nPoints > 0) ) then
557558 nActive = nActive + 1
558559 tempTrack( nActive ) = me%instance(iLog)
559560 ! Pointer to array of tracking headers loaded from config file
Show on old repository browser