Searched defs:PRECOND (Results 1 – 1 of 1) sorted by relevance
| /phasta/svLS/ |
| H A D | PRECOND.f | 41 SUBROUTINE PRECOND(nFaces, dof, nNo, nnz, commu, cS, face, subroutine
46 INTEGER, INTENT(IN) :: nFaces, dof, nNo, nnz
47 TYPE(svLS_commuType), INTENT(IN) :: commu
48 TYPE(svLS_cSType), INTENT(IN) :: cS(commu%nTasks)
49 TYPE(svLS_faceType), INTENT(INOUT) :: face(nFaces)
50 INTEGER, INTENT(IN) :: rowPtr(2,nNo), colPtr(nnz), diagPtr(nNo)
51 REAL*8, INTENT(INOUT) :: Val(dof*dof,nnz), R(dof,nNo)
52 REAL*8, INTENT(OUT) :: W(dof,nNo)
54 INTEGER i, j, a, b, d, Ac, faIn
|