Searched defs:DefaultUpdateDampR (Results 1 – 1 of 1) sorted by relevance
| /dports/science/elmerfem/elmerfem-release-9.0/fem/src/ |
| H A D | DefUtils.F90 | 4319 RECURSIVE SUBROUTINE DefaultUpdateDampR( B, UElement, USolver ) subroutine
4321 TYPE(Solver_t), OPTIONAL, TARGET :: USolver
4322 TYPE(Element_t), OPTIONAL, TARGET :: UElement
4323 REAL(KIND=dp) :: B(:,:)
4325 TYPE(Solver_t), POINTER :: Solver
4326 TYPE(Matrix_t), POINTER :: A local
4327 TYPE(Variable_t), POINTER :: x local
4328 TYPE(Element_t), POINTER :: Element, P1, P2
4330 INTEGER :: i,j,n
4331 INTEGER, POINTER :: Indexes(:)
|