Searched refs:ainvheap (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/AMG/ |
| H A D | ramg_coarse.f | 590 integer,dimension(anshg) :: aheap,ainvheap local
728 call ramg_initheap(aheap,ainvheap,amg_L,nheaps,anshg)
735 call ramg_popheap(aheap,ainvheap,amg_L,nheaps,
736 & ainvheap(m),anshg)
750 call ramg_popheap(aheap,ainvheap,amg_L,nheaps,
751 & ainvheap(m),anshg)
757 call ramg_popheap(aheap,ainvheap,amg_L,nheaps,ainvheap(m),
768 call ramg_popheap(aheap,ainvheap,amg_L,nheaps,ainvheap(k),
781 call ramg_adjheap(aheap,ainvheap,amg_L,nheaps,ainvheap(n),
794 call ramg_adjheap(aheap,ainvheap,amg_L,nheaps,ainvheap(k),
|