Lines Matching refs:R
42 2 ls, rowPtr, colPtr, D, G, L, R)
53 REAL*8, INTENT(INOUT) :: R(nNo) local
66 errO = NORMS(mynNo, commu, R)
74 P = R
99 R = R - alpha*SP
100 err = NORMS(mynNo, commu, R)
102 P = R + err/errO*P
104 R = X
118 2 rowPtr, colPtr, K, R)
128 REAL*8, INTENT(INOUT) :: R(dof,nNo) local
139 err = NORMV(dof, mynNo, commu, R)
145 P = R
158 R = R - alpha*KP
159 err = NORMV(dof, mynNo, commu, R)
161 P = R + err/errO*P
164 R = X
177 2 rowPtr, colPtr, K, R)
187 REAL*8, INTENT(INOUT) :: R(nNo) local
198 err = NORMS(mynNo, commu, R)
204 P = R
215 R = R - alpha*KP
216 err = NORMS(mynNo, commu, R)
218 P = R + err/errO*P
221 R = X