Searched refs:tramg_ev (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/AMG/ |
| H A D | ramg_ggb.f | 38 real(kind=8),allocatable,dimension(:,:):: teA,tramg_ev local
92 allocate(tramg_ev(nsize,maxncv))
100 tramg_ev = 0
105 & tramg_ev,
115 & tramg_ev,
127 & tramg_ev,nsize,
129 & resid,ncv,tramg_ev,
137 call ramg_ggb_G2A(ramg_ggb_ev(:,i),tramg_ev(:,i),
180 deallocate(tramg_ev)
|
| H A D | ramg_mls.f | 54 real(kind=8),allocatable,dimension(:,:):: tramg_ev local
116 allocate(tramg_ev(nsize,maxncv))
119 tramg_ev = 0
124 & tramg_ev,
147 & tramg_ev,
160 & tramg_ev,nsize,
162 & resid,ncv,tramg_ev,
173 deallocate(tramg_ev)
234 real(kind=8),allocatable,dimension(:,:):: tramg_ev local
296 allocate(tramg_ev(nsize,maxncv))
[all …]
|