Lines Matching refs:lhsGProwp
36 type(i1d) :: lhsGProwp,lhsGPcolm
121 & lhsGPcolm,lhsGProwp,lhsGP,4,
133 k = lhsGProwp%p(m)
160 k = lhsGProwp%p(m)
162 p = lhsGProwp%p(j)
209 j = lhsGProwp%p(m)
211 k = lhsGProwp%p(n)
278 & (lhsGProwp%p(ki).lt.lhsGProwp%p(kj)) )
283 & (lhsGProwp%p(kj).lt.lhsGProwp%p(ki)) )
287 p = lhsGProwp%p(ki)
288 q = lhsGProwp%p(kj)
314 j = lhsGProwp%p(m)
343 deallocate(lhsGProwp%p)
350 & lhsGPcolm,lhsGProwp,lhsGP,1,
359 amg_A_rowp(1)%p = lhsGProwp%p
362 deallocate(lhsGProwp%p)