Searched refs:cmtxA (Results 1 – 3 of 3) sorted by relevance
| /phasta/phSolver/AMG/ |
| H A D | ramg_smoother.f | 277 if (allocated(cmtxA)) deallocate(cmtxA)
280 allocate(cmtxA(Anshg,Anshg))
286 call ramg_sparse2dense(Acolm,Arowp,Alhs,Anshg,Annz_tot,cmtxA)
290 call ludcmp(cmtxA,Anshg,Anshg,cindx,d)
389 call lubksb(cmtxA,amg_nshg(cl),amg_nshg(cl),cindx,Asol)
|
| H A D | ramg_data.f | 100 real(kind=8),dimension(:,:),allocatable :: cmtxA variable
|
| H A D | ramg_tools.f | 616 deallocate(cmtxA)
|