Searched defs:GCRUpdate (Results 1 – 2 of 2) sorted by relevance
| /dports/science/elmerfem/elmerfem-release-9.0/fem/src/modules/ |
| H A D | CoupledNSUpdate.F90 | 475 SUBROUTINE GCRUpdate( n, A, M, x, b, r, Snew, S, V, RR, Round) subroutine
477 INTEGER :: n, Round
478 TYPE(Matrix_t), POINTER :: A, M
479 REAL(KIND=dp) :: x(:), b(:), r(:), Snew(:)
480 REAL(KIND=dp) :: S(:,:), V(:,:), RR(:)
482 REAL(KIND=dp) :: T1(n), T2(n), beta, alpha, res !, Snew(n)
483 INTEGER :: i,j,k
|
| H A D | ParStokes.F90 | 1119 SUBROUTINE GCRUpdate( n, A, M, x, b, r, Snew, S, V, RR, Round, res, MParam) subroutine
1121 INTEGER :: n, Round, MParam
1122 TYPE(Matrix_t), POINTER :: A, M
1123 REAL(KIND=dp) :: x(:), b(:), r(:), Snew(:)
1124 REAL(KIND=dp) :: S(:,:), V(:,:), RR(:), res
1126 REAL(KIND=dp) :: T1(n), T2(n), beta, alpha
1127 INTEGER :: i,j,k
|