Recovered the ouflowBoundary code
This commit is contained in:
parent
6828f1ef96
commit
e54c86a952
4 changed files with 52 additions and 2 deletions
|
|
@ -789,7 +789,15 @@ MODULE moduleMesh
|
|||
|
||||
end type boundaryQuasiNeutrality
|
||||
|
||||
!Wrapper for boundary types (one per species)
|
||||
!Boundary for quasi-neutral outflow adjusting reflection coefficient
|
||||
type, public, extends(boundaryParticleGeneric):: boundaryOutflowAdaptive
|
||||
real(8):: outflowCurrent
|
||||
real(8):: reflectionFraction
|
||||
contains
|
||||
procedure, pass:: apply => outflowAdaptive
|
||||
|
||||
end type boundaryOutflowAdaptive
|
||||
|
||||
interface
|
||||
module subroutine reflection(self, edge, part)
|
||||
use moduleSpecies
|
||||
|
|
@ -854,6 +862,15 @@ MODULE moduleMesh
|
|||
|
||||
end subroutine quasiNeutrality
|
||||
|
||||
module subroutine outflowAdaptive(self, edge, part)
|
||||
use moduleSpecies
|
||||
|
||||
class(boundaryOutflowAdaptive), intent(inout):: self
|
||||
class(meshEdge), intent(inout):: edge
|
||||
class(particle), intent(inout):: part
|
||||
|
||||
end subroutine outflowAdaptive
|
||||
|
||||
! Generic basic boundary conditions to use internally in the code
|
||||
module subroutine genericReflection(edge, part)
|
||||
use moduleSpecies
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue