Lines Matching refs:nnz
41 SUBROUTINE NSSOLVER(nFaces, gnNo, dof, nNo, nnz, mynNo, commu, argument
47 INTEGER, INTENT(IN) :: nFaces, gnNo, dof, nNo, nnz, mynNo local
52 INTEGER, INTENT(IN) :: rowPtr(2,nNo), colPtr(nnz)
53 REAL*8, INTENT(IN) :: Val(dof*dof,nnz)
95 CALL GMRES(nFaces, nsd, nNo, nnz, mynNo, commu, cS, face,
98 CALL SPARMULVS(nsd, nNo, nnz, commu, cS,
102 CALL CGRAD(nFaces, nsd, nNo, nnz, mynNo, commu, cS, face,
105 CALL SPARMULSV(nsd, nNo, nnz, commu, cS,
109 CALL GMRES(nFaces, nsd, nNo, nnz, mynNo, commu, cS, face,
112 CALL SPARMULVV(nsd, nNo, nnz, commu, cS,
118 CALL SPARMULSS(nNo, nnz, commu, cS,
121 CALL SPARMULVS(nsd, nNo, nnz, commu, cS,
199 ALLOCATE(mK(nsd*nsd,nnz), mG(nsd,nnz), mD(nsd,nnz), mL(nnz),
200 2 Gt(nsd,nnz), tmp((nsd+1)*(nsd+1)))
203 DO i=1, nnz
220 DO i=1, nnz