cleaning directly on the face-vector
This subroutine assumes the Maxwell equations with D and B as input variables. Furthermore, it is able to handle jumping material parameters.
Assign the same flux for left and right element
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | nTotalFaces | |||
| integer, | intent(in) | :: | nSides | |||
| integer, | intent(in) | :: | nFaceDofs | |||
| real(kind=rk), | intent(in) | :: | faceRep(nTotalFaces,nFaceDofs,8,2) | |||
| real(kind=rk), | intent(inout) | :: | faceFlux(nTotalFaces,nFaceDofs,8,2) | |||
| integer, | intent(in) | :: | leftPos(nSides) | |||
| integer, | intent(in) | :: | rightPos(nsides) | |||
| integer, | intent(in) | :: | var(8) | |||
| real(kind=rk), | intent(in) | :: | material_left(nSides,1,4) | |||
| real(kind=rk), | intent(in) | :: | material_right(nSides,1,4) |