Searched refs:aheap (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)
732 m = aheap(1)+1
735 call ramg_popheap(aheap,ainvheap,amg_L,nheaps,
750 call ramg_popheap(aheap,ainvheap,amg_L,nheaps,
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),
|