Lines Matching refs:X
58 REAL*8, ALLOCATABLE :: X(:), P(:), SP(:), DGP(:), GP(:,:), local
61 ALLOCATE(X(nNo), P(nNo), SP(nNo), DGP(nNo), GP(dof,nNo),
70 X = 0D0
98 X = X + alpha*P
104 R = X
110 DEALLOCATE(X, P, SP, DGP, GP)
133 REAL*8, ALLOCATABLE :: P(:,:), KP(:,:), X(:,:) local
135 ALLOCATE(P(dof,nNo), KP(dof,nNo), X(dof,nNo))
144 X = 0D0
157 X = X + alpha*P
164 R = X
192 REAL*8, ALLOCATABLE :: P(:), KP(:), X(:) local
194 ALLOCATE(P(nNo), KP(nNo), X(nNo))
203 X = 0D0
214 X = X + alpha*P
221 R = X