It seems to work, but I don't think this is quite useful for the manuscript
This commit is contained in:
parent
40163a0056
commit
eb10ae92a6
4 changed files with 71 additions and 12 deletions
|
|
@ -176,6 +176,14 @@ submodule(moduleMesh) elements
|
|||
|
||||
END DO
|
||||
|
||||
TYPE IS(boundaryEMFloating)
|
||||
DO n = 1, boundary%nNodes
|
||||
ni = boundary%nodes(n)%obj%n
|
||||
self%K(ni, :) = 0.D0
|
||||
self%K(ni, ni) = 1.D0
|
||||
|
||||
END DO
|
||||
|
||||
END SELECT
|
||||
|
||||
END DO
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue