Lines Matching refs:IY
489 $ INCYS, IX, IY, KL, KLS, KU, KUS, LAA, LDA, local
602 DO 70 IY = 1, NINC
603 INCY = INC( IY )
849 $ INCYS, IX, IY, K, KS, LAA, LDA, LDAS, LX, LY, local
948 DO 70 IY = 1, NINC
949 INCY = INC( IY )
1595 $ IY, J, LAA, LDA, LDAS, LX, LY, M, MS, N, NARGS, local
1655 DO 90 IY = 1, NINC
1656 INCY = INC( IY )
2163 $ IY, J, JA, JJ, LAA, LDA, LDAS, LJ, LX, LY, N, local
2238 DO 110 IY = 1, NINC
2239 INCY = INC( IY )
2663 INTEGER I, INCXL, INCYL, IY, J, JX, KX, KY, ML, NL local
2694 IY = KY
2696 YT( IY ) = ZERO
2697 G( IY ) = ZERO
2701 YT( IY ) = YT( IY ) + A( J, I )*X( JX )
2702 G( IY ) = G( IY ) + ABS( A( J, I )*X( JX ) )
2707 YT( IY ) = YT( IY ) + A( I, J )*X( JX )
2708 G( IY ) = G( IY ) + ABS( A( I, J )*X( JX ) )
2712 YT( IY ) = ALPHA*YT( IY ) + BETA*Y( IY )
2713 G( IY ) = ABS( ALPHA )*G( IY ) + ABS( BETA*Y( IY ) )
2714 IY = IY + INCYL