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

More comments

Browse source 
So if the source vector is being updated every time step, it might be
"easy" to implement these things.
This commit is contained in:
Jorge Gonzalez 2024-07-12 13:17:02 +02:00
commit f0a27c0529
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/modules/solver/electromagnetic/moduleEM.f90
View file

@ -49,7 +49,7 @@ MODULE moduleEM
END DO END DO
END SUBROUTINE END SUBROUTINE apply
!Assemble the source vector based on the charge density to solve Poisson's equation !Assemble the source vector based on the charge density to solve Poisson's equation
SUBROUTINE assembleSourceVector(vectorF) SUBROUTINE assembleSourceVector(vectorF)
@ -130,6 +130,7 @@ MODULE moduleEM
ALLOCATE(tempF(1:mesh%numNodes)) ALLOCATE(tempF(1:mesh%numNodes))
!$OMP END SINGLE !$OMP END SINGLE
!TODO: Is this done every time step??? Then things are gonna be really simple.
CALL assembleSourceVector(tempF) CALL assembleSourceVector(tempF)
!$OMP SINGLE !$OMP SINGLE