Lines Matching refs:Y

1       SUBROUTINE DSBMV(UPLO,N,K,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)  argument
8       DOUBLE PRECISION A(LDA,*),X(*),Y(*)  local
198                       Y(I) = ZERO
202                       Y(I) = BETA*Y(I)
209                       Y(IY) = ZERO
214                       Y(IY) = BETA*Y(IY)
232                       Y(I) = Y(I) + TEMP1*A(L+I,J)
235                   Y(J) = Y(J) + TEMP1*A(KPLUS1,J) + ALPHA*TEMP2
247                       Y(IY) = Y(IY) + TEMP1*A(L+I,J)
252                   Y(JY) = Y(JY) + TEMP1*A(KPLUS1,J) + ALPHA*TEMP2
269                   Y(J) = Y(J) + TEMP1*A(1,J)
272                       Y(I) = Y(I) + TEMP1*A(L+I,J)
275                   Y(J) = Y(J) + ALPHA*TEMP2
283                   Y(JY) = Y(JY) + TEMP1*A(1,J)
290                       Y(IY) = Y(IY) + TEMP1*A(L+I,J)
293                   Y(JY) = Y(JY) + ALPHA*TEMP2