Searched refs:tmp_rmtx (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/AMG/ |
| H A D | ramg_paratools.f | 47 real(kind=8),dimension(redun,nshg) :: tmp_rmtx local
276 tmp_rmtx = 0
287 tmp_rmtx(:,kj) = alhsP(:,k)
296 tmp_rmtx(:,kj) = Pmtx%pp(ki)%p(:,k)
321 tmp_rmtx(p,kj) = tmp_rmtx(p,kj)+sub_mtx2%pp(i)%p(p,ki)
333 Pmtx%pp(ki)%p(:,k) = tmp_rmtx(:,kj)
|