Lines Matching refs:amg_paramap
75 allocate(amg_paramap(1)%p(nshg))
118 call ramg_initBCflag(amg_paramap(1)%p,ilwork,BC,iBC,iper)
127 amg_paraext(1)%p = amg_paramap(1)%p
129 if (amg_paramap(1)%p(i).ne.(myrank+1)) then
136 amg_paraext(1)%p(k)=amg_paramap(1)%p(i)
292 cki = amg_paramap(1)%p(i)
293 ckj = amg_paramap(1)%p(j)
294 ckk = amg_paramap(1)%p(k)
316 cki = amg_paramap(1)%p(i)
317 ckj = amg_paramap(1)%p(j)
328 cki = amg_paramap(1)%p(i)
329 ckj = amg_paramap(1)%p(j)
330 ckk = amg_paramap(1)%p(amg_A_rowp(1)%p(ki))