Input for floating boundary
This commit is contained in:
parent
1b864d6bed
commit
2291236efb
1 changed files with 5 additions and 2 deletions
|
|
@ -969,17 +969,20 @@ MODULE moduleInput
|
|||
|
||||
select case(bType)
|
||||
case ("dirichlet")
|
||||
! Allocate boundary edge
|
||||
allocate(boundaryEMDirichlet:: self)
|
||||
|
||||
CALL initDirichlet(self, config, object)
|
||||
|
||||
case ("dirichlettime")
|
||||
! Allocate boundary edge
|
||||
allocate(boundaryEMDirichletTime:: self)
|
||||
|
||||
call initDirichletTime(self, config, object)
|
||||
|
||||
case ("floating")
|
||||
allocate(boundaryEMFloating:: self)
|
||||
|
||||
call initFloating(self, config, object)
|
||||
|
||||
case default
|
||||
call criticalError('Boundary type ' // bType // ' not supported', 'readBoundaryEM')
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue