Home
last modified time | relevance | path

Searched refs:tmp_rowmap (Results 1 – 1 of 1) sorted by relevance

/phasta/phSolver/AMG/
H A Dramg_paratools.f46 integer,dimension(nshg) :: tmp_rowmap,tmp_revrmap local
274 tmp_rowmap = 0
285 tmp_rowmap(kj) = k-acolm(ki)+1
294 tmp_rowmap(kj) = k
308 if (tmp_rowmap(kj).eq.0) then ! not yet occupied
310 tmp_rowmap(kj) = rownnz