Init for boundaries particles
This commit is contained in:
parent
6b96d56c9d
commit
6f8656bc21
6 changed files with 80 additions and 40 deletions
|
|
@ -3,6 +3,7 @@ MODULE moduleMesh
|
|||
USE moduleList
|
||||
USE moduleOutput
|
||||
USE moduleCollisions
|
||||
use moduleSpecies, only: nSpecies
|
||||
IMPLICIT NONE
|
||||
|
||||
! Declarations for elements
|
||||
|
|
@ -784,9 +785,26 @@ MODULE moduleMesh
|
|||
|
||||
end type boundaryPointer
|
||||
|
||||
type boundaryParticleLinking
|
||||
integer:: physicalSurface
|
||||
integer, allocatable, dimension(:):: speciesIndex
|
||||
|
||||
end type boundaryParticleLinking
|
||||
|
||||
!Number of boundaries
|
||||
INTEGER:: nBoundaries = 0
|
||||
INTEGER:: nBoundaries = 0, nPhysicalSurfaces = 0
|
||||
!Array for boundaries
|
||||
TYPE(boundaryCont), ALLOCATABLE, TARGET:: boundariesParticle(:)
|
||||
!Array for linking boundaries
|
||||
type(boundaryParticleLinking), allocatable, dimension(:):: boundariesParticleLinking
|
||||
|
||||
interface
|
||||
module function physicalSurface_to_id(physicalSurface) result(b)
|
||||
integer:: physicalSurface
|
||||
integer:: b
|
||||
|
||||
end function physicalSurface_to_id
|
||||
|
||||
end interface
|
||||
|
||||
END MODULE moduleMesh
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue