Lines Matching refs:Pmtx
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)
444 deallocate(Pmtx%pp(i)%p)
450 deallocate(Pmtx%pp)