Home
last modified time | relevance | path

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

/phasta/phSolver/AMG/
H A Dramg_coarse.f856 integer,dimension(amg_nshg(slevel)) :: revmap local
858 revmap = 0
862 revmap(j) = i
868 amg_cfmap(revmap(i)) = amg_cfmap(revmap(i)) + 1
H A Dramg_paratools.f70 revmap = 0
1090 integer,dimension(amg_nshg(level)) :: revmap local
1091 revmap = 0
1096 revmap(j) = i
1101 garray(revmap(i)) = carray(i)