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

Almost done with EM, not to modify the EM module itself

Browse source
This commit is contained in:
Jorge Gonzalez 2026-02-18 15:14:59 +01:00
commit d211ed9a71
13 changed files with 165 additions and 97 deletions
Download patch file Download diff file Expand all files Collapse all files

11
src/modules/mesh/moduleMesh.f90
View file

@ -495,7 +495,7 @@ MODULE moduleMesh
END TYPE meshParticles
interface
pure module subroutine constructGlobalK(self)
module subroutine constructGlobalK(self)
class(meshParticles), intent(inout):: self
end subroutine constructGlobalK
@ -626,6 +626,12 @@ MODULE moduleMesh
end subroutine initBoundaryParticle
module function boundaryParticleName_to_Index(boundaryName) result(bp)
character(:), allocatable:: boundaryName
integer:: bp
end function boundaryParticleName_to_Index
end interface
abstract interface
@ -915,12 +921,13 @@ MODULE moduleMesh
type:: boundaryEMLinking
integer:: physicalSurface
class(boundaryEMGeneric), pointer:: boundary => null()
class(boundaryEMGeneric), pointer:: model => null()
end type boundaryEMLinking
INTEGER:: nBoundariesEM
TYPE(boundaryEMCont), ALLOCATABLE, target:: boundariesEM(:)
type(boundaryEMLinking), allocatable, dimension(:):: boundariesEMLinking
!Information of charge and reference parameters for rho vector
REAL(8), ALLOCATABLE:: qSpecies(:)