First thing that I am kinda happy with.

Still some things to improve but at least push is good.
This commit is contained in:
Jorge Gonzalez 2023-01-05 22:43:51 +01:00
commit 7f6afd6a87
11 changed files with 336 additions and 258 deletions

View file

@ -354,11 +354,13 @@ MODULE moduleSolver
IMPLICIT NONE
INTEGER:: n
CLASS(meshCell), POINTER:: cell
!Loops over the particles to scatter them
!$OMP DO
DO n = 1, nPartOld
CALL mesh%cells(partOld(n)%vol)%obj%scatter(partOld(n))
cell => mesh%cells(partOld(n)%vol)%obj
CALL cell%scatter(cell%nNodes, partOld(n))
END DO
!$OMP END DO