Searched defs:UpdateGlobalForce (Results 1 – 1 of 1) sorted by relevance
/dports/science/elmerfem/elmerfem-release-9.0/fem/src/ |
H A D | SolverUtils.F90 | 1408 SUBROUTINE UpdateGlobalForce(ForceVector, LocalForce, n, & subroutine 1411 REAL(KIND=dp) :: LocalForce(:) !< Element local force vector. 1412 REAL(KIND=dp) :: ForceVector(:) !< The global RHS vector. 1413 INTEGER :: n !< Number of nodes. 1414 INTEGER :: NDOFs !< Number of element nodes. 1415 INTEGER :: NodeIndexes(:) !< Element node to global node numbering mapping. 1417 TYPE(Element_t), OPTIONAL, TARGET :: UElement !< Element to be updated 1419 TYPE(Element_t), POINTER :: Element 1420 INTEGER :: i,j,k, dim,indexes(n) 1421 LOGICAL :: Rotate [all …]
|