Searched refs:rownnz (Results 1 – 1 of 1) sorted by relevance
53 integer :: rownnz local277 rownnz = 0289 rownnz = rownnz+acolm(ki+1)-acolm(ki)298 rownnz = rownnz+Pcolm(ki)309 rownnz = rownnz+1310 tmp_rowmap(kj) = rownnz311 tmp_revrmap(rownnz) = kj327 Pcolm(ki) = rownnz328 allocate(Prowp%pp(ki)%p(rownnz))329 allocate(Pmtx%pp(ki)%p(redun,rownnz))[all …]