Searched refs:Pmtx (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/AMG/ |
| H A D | ramg_paratools.f | 52 type(r12dd) :: Pmtx local
268 allocate(Pmtx%pp(nshg))
296 tmp_rmtx(:,kj) = Pmtx%pp(ki)%p(:,k)
300 deallocate(Pmtx%pp(ki)%p)
329 allocate(Pmtx%pp(ki)%p(redun,rownnz))
333 Pmtx%pp(ki)%p(:,k) = tmp_rmtx(:,kj)
349 swaptemp(:) = Pmtx%pp(ki)%p(:,gj)
350 Pmtx%pp(ki)%p(:,gj) = Pmtx%pp(ki)%p(:,gi)
351 Pmtx%pp(ki)%p(:,gi) = swaptemp(:)
392 lhsGP%p(:,rownnz) = Pmtx%pp(i)%p(:,j)
[all …]
|