Lines Matching refs:IY
498 $ INCYS, IX, IY, KL, KLS, KU, KUS, LAA, LDA, local
611 DO 70 IY = 1, NINC
612 INCY = INC( IY )
853 $ INCYS, IX, IY, K, KS, LAA, LDA, LDAS, LX, LY, local
952 DO 70 IY = 1, NINC
953 INCY = INC( IY )
1591 $ IY, J, LAA, LDA, LDAS, LX, LY, M, MS, N, NARGS, local
1652 DO 90 IY = 1, NINC
1653 INCY = INC( IY )
2161 $ IY, J, JA, JJ, LAA, LDA, LDAS, LJ, LX, LY, N, local
2236 DO 110 IY = 1, NINC
2237 INCY = INC( IY )
2479 INTEGER I, INCXL, INCYL, IY, J, JX, KX, KY, ML, NL local
2515 IY = KY
2517 YT( IY ) = ZERO
2518 G( IY ) = RZERO
2522 YT( IY ) = YT( IY ) + A( J, I )*X( JX )
2523 G( IY ) = G( IY ) + ABS1( A( J, I ) )*ABS1( X( JX ) )
2528 YT( IY ) = YT( IY ) + CONJG( A( J, I ) )*X( JX )
2529 G( IY ) = G( IY ) + ABS1( A( J, I ) )*ABS1( X( JX ) )
2534 YT( IY ) = YT( IY ) + A( I, J )*X( JX )
2535 G( IY ) = G( IY ) + ABS1( A( I, J ) )*ABS1( X( JX ) )
2539 YT( IY ) = ALPHA*YT( IY ) + BETA*Y( IY )
2540 G( IY ) = ABS1( ALPHA )*G( IY ) + ABS1( BETA )*ABS1( Y( IY ) )
2541 IY = IY + INCYL