Searched defs:SPARMULVS (Results 1 – 1 of 1) sorted by relevance
| /phasta/svLS/ |
| H A D | SPARMUL.f | 117 SUBROUTINE SPARMULVS(dof, nNo, nnz, commu, cS, rowPtr, colPtr, subroutine
122 INTEGER, INTENT(IN) :: dof, nNo, nnz
123 TYPE(svLS_commuType), INTENT(IN) :: commu
124 TYPE(svLS_cSType), INTENT(IN) :: cS(commu%nTasks)
125 INTEGER, INTENT(IN) :: rowPtr(2,nNo), colPtr(nnz)
126 REAL*8, INTENT(IN) :: K(dof,nnz), U(dof,nNo)
127 REAL*8, INTENT(OUT) :: KU(nNo)
129 INTEGER i, j, col
|