Lines Matching refs:IY
434 $ INCYS, IX, IY, KL, KLS, KU, KUS, LAA, LDA, local
539 DO 70 IY = 1, NINC
540 INCY = INC( IY )
779 $ INCYS, IX, IY, K, KS, LAA, LDA, LDAS, LX, LY, local
872 DO 70 IY = 1, NINC
873 INCY = INC( IY )
1488 $ IY, J, LAA, LDA, LDAS, LX, LY, M, MS, N, NARGS, local
1549 DO 90 IY = 1, NINC
1550 INCY = INC( IY )
2049 $ IY, J, JA, JJ, LAA, LDA, LDAS, LJ, LX, LY, N, local
2118 DO 110 IY = 1, NINC
2119 INCY = INC( IY )
2898 INTEGER I, INCXL, INCYL, IY, J, JX, KX, KY, ML, NL local
2934 IY = KY
2936 YT( IY ) = ZERO
2937 G( IY ) = RZERO
2941 YT( IY ) = YT( IY ) + A( J, I )*X( JX )
2942 G( IY ) = G( IY ) + ABS1( A( J, I ) )*ABS1( X( JX ) )
2947 YT( IY ) = YT( IY ) + CONJG( A( J, I ) )*X( JX )
2948 G( IY ) = G( IY ) + ABS1( A( J, I ) )*ABS1( X( JX ) )
2953 YT( IY ) = YT( IY ) + A( I, J )*X( JX )
2954 G( IY ) = G( IY ) + ABS1( A( I, J ) )*ABS1( X( JX ) )
2958 YT( IY ) = ALPHA*YT( IY ) + BETA*Y( IY )
2959 G( IY ) = ABS1( ALPHA )*G( IY ) + ABS1( BETA )*ABS1( Y( IY ) )
2960 IY = IY + INCYL