Structure for Neumann BC

This commit is contained in:
Jorge Gonzalez 2026-04-13 19:49:53 +02:00
commit 4da3bf120c
2 changed files with 48 additions and 0 deletions

View file

@ -123,6 +123,27 @@ submodule(moduleMesh) boundaryEM
end subroutine updateDirichletTime
! Neumann constant value
! Init
module subroutine initNeumann(self, config, object)
use json_module
implicit none
class(boundaryEMGeneric), allocatable, intent(inout):: self
type(json_file), intent(inout):: config
character(:), allocatable, intent(in):: object
end subroutine initNeumann
! Apply
module subroutine applyNeumann(self, vectorF)
implicit none
class(boundaryEMNeumann), intent(in):: self
real(8), intent(inout):: vectorF(:)
end subroutine applyNeumann
! Floating surface
! Init
module subroutine initFloating(self, config, object)