H A D | dspmv.f | 106 INTEGER I,INFO,IX,IY,J,JX,JY,K,KK,KX,KY local in subroutine:DSPMV 182 KK = 1 191 K = KK 197 Y(J) = Y(J) + TEMP1*AP(KK+J-1) + ALPHA*TEMP2 198 KK = KK + J 208 DO 70 K = KK,KK + J - 2 214 Y(JY) = Y(JY) + TEMP1*AP(KK+J-1) + ALPHA*TEMP2 217 KK [all...] |