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

Skeleton of boundaries for EM with new structure for mesh

Browse source
This commit is contained in:
Jorge Gonzalez 2026-02-17 14:54:22 +01:00
commit 6a7c92f62f
5 changed files with 269 additions and 224 deletions
Download patch file Download diff file Expand all files Collapse all files

12
src/modules/mesh/moduleMesh@boundaryParticle.f90
View file

@ -25,13 +25,13 @@ submodule(moduleMesh) boundaryParticle
end function boundaryParticleName_to_Index
module subroutine initBoundary(self, config, object, b)
module subroutine initBoundaryParticle(self, config, object, b)
use json_module
use moduleRefParam, only: m_ref
use moduleConstParam, only: me
implicit none
class(boundaryGeneric), allocatable, intent(out):: self
class(boundaryParticleGeneric), allocatable, intent(out):: self
type(json_file), intent(inout):: config
character(:), allocatable, intent(in):: object
integer, intent(in):: b
@ -114,13 +114,13 @@ submodule(moduleMesh) boundaryParticle
END SELECT
end subroutine initBoundary
end subroutine initBoundaryParticle
SUBROUTINE initWallTemperature(boundary, T, c)
USE moduleRefParam
IMPLICIT NONE
CLASS(boundaryGeneric), ALLOCATABLE, INTENT(out):: boundary
CLASS(boundaryParticleGeneric), ALLOCATABLE, INTENT(out):: boundary
REAL(8), INTENT(in):: T, c !Wall temperature and specific heat
REAL(8):: vTh
@ -143,7 +143,7 @@ submodule(moduleMesh) boundaryParticle
USE moduleErrors
IMPLICIT NONE
CLASS(boundaryGeneric), ALLOCATABLE, INTENT(out):: boundary
CLASS(boundaryParticleGeneric), ALLOCATABLE, INTENT(out):: boundary
real(8), intent(in):: mImpact
REAL(8), INTENT(in):: m0, n0, v0(1:3), T0 !Neutral properties
INTEGER, INTENT(in):: ion
@ -189,7 +189,7 @@ submodule(moduleMesh) boundaryParticle
subroutine initQuasiNeutrality(boundary)
implicit none
class(boundaryGeneric), allocatable, intent(out):: boundary
class(boundaryParticleGeneric), allocatable, intent(out):: boundary
integer:: e, et
allocate(boundaryQuasiNeutrality:: boundary)