Added center point procedure to edge and eps in inside to avoid some rounding errors

2026-03-04 10:41:55 +01:00 · 2026-03-04 10:41:55 +01:00 · 600f7305bd
commit 600f7305bd
parent a89853135c
9 changed files with 129 additions and 25 deletions
--- a/src/modules/mesh/moduleMesh@elements.f90
+++ b/src/modules/mesh/moduleMesh@elements.f90
@ -443,6 +443,9 @@ submodule(moduleMesh) elements

      DO e = 1, self%numCells
        Xi = self%cells(e)%obj%phy2log(r)
+        if (e < 160) then
+          print *, e, Xi
+        end if
        IF(self%cells(e)%obj%inside(Xi)) THEN
          nVol = self%cells(e)%obj%n
          EXIT