Searched refs:amg_cfmap (Results 1 – 5 of 5) sorted by relevance
| /phasta/phSolver/AMG/ |
| H A D | ramg_extract.f | 70 deallocate(amg_cfmap)
98 allocate(amg_cfmap(nshg))
100 amg_cfmap = 1
|
| H A D | ramg_coarse.f | 121 call commOut_i(amg_cfmap,ilwork,1,iper,iBC,BC)
861 if (amg_cfmap(i).eq.slevel) then
868 amg_cfmap(revmap(i)) = amg_cfmap(revmap(i)) + 1
882 if (amg_cfmap(i).eq.slevel) then
885 else if (amg_cfmap(i).eq.(slevel+1)) then
|
| H A D | ramg_data.f | 67 integer,dimension(:),allocatable :: amg_cfmap variable
|
| H A D | ramg_paratools.f | 682 if (amg_cfmap(i).ge.lvl) then
697 if (amg_cfmap(k).ge.lvl) then
726 if (amg_cfmap(k).ge.lvl) then
1095 if (amg_cfmap(i).ge.level) then
1116 if (amg_cfmap(i).ge.level) then
|
| H A D | ramg_tools.f | 1047 write(265,'((2I)(3E14.5))')i,amg_cfmap(i),
|