JGonzalez/fpakc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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

Browse source
This commit is contained in:
Jorge Gonzalez 2026-03-04 10:41:55 +01:00
commit 600f7305bd
9 changed files with 129 additions and 25 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/modules/init/moduleInput.f90
View file

@ -1255,7 +1255,7 @@ MODULE moduleInput
findCellColl => findCellCollMesh
! Link edges with cells in meshColl
DO e=1, mesh%numEdges
nVolColl = findCellBrute(meshColl, mesh%edges(e)%obj%randPos())
nVolColl = findCellBrute(meshColl, mesh%edges(e)%obj%center())
IF (nVolColl > 0) THEN
mesh%edges(e)%obj%eColl => meshColl%cells(nVolColl)%obj