Lines Matching refs:R
55 REAL*8, ALLOCATABLE :: R(:,:), W(:,:) local
84 ALLOCATE(R(dof,nNo), W(dof,nNo))
86 R(:,lhs%map(a)) = Ri(:,a)
89 CALL COMMUV(dof, nNo, lhs%commu, lhs%cS, R)
91 2 lhs%face, lhs%rowPtr, lhs%colPtr, lhs%diagPtr, Val, R, W)
97 3 Val, R)
100 2 lhs%cS, lhs%face, ls%RI, lhs%rowPtr, lhs%colPtr, Val, R)
104 2 ls%RI, lhs%rowPtr, lhs%colPtr, Val, R)
107 2 ls%RI, lhs%rowPtr, lhs%colPtr, Val, R)
113 R = R*W
116 Ri(:,a) = R(:,lhs%map(a))
119 DEALLOCATE(R, W)