Searched defs:svLS_SOLVE (Results 1 – 2 of 2) sorted by relevance
| /phasta/svLS/ |
| H A D | SOLVE.f | 41 SUBROUTINE svLS_SOLVE (lhs, ls, dof, Ri, Val, incL, res) subroutine
45 TYPE(svLS_lhsType), INTENT(INOUT) :: lhs
46 TYPE(svLS_lsType), INTENT(INOUT) :: ls
47 INTEGER, INTENT(IN) :: dof
48 REAL*8, INTENT(INOUT) :: Ri(dof,lhs%nNo)
49 REAL*8, INTENT(INOUT) :: Val(dof*dof,lhs%nnz)
50 INTEGER, INTENT(IN), OPTIONAL :: incL(lhs%nFaces)
51 REAL*8, INTENT(IN), OPTIONAL :: res(lhs%nFaces)
53 LOGICAL flag
54 INTEGER faIn, a, nNo, nnz, nFaces
[all …]
|
| H A D | dummy_prototypes.f | 99 SUBROUTINE svLS_SOLVE (lhs, ls, dof, Ri, Val, res) subroutine
107 END SUBROUTINE svLS_SOLVE argument
|