Lines Matching refs:IY
499 $ INCYS, IX, IY, KL, KLS, KU, KUS, LAA, LDA, local
612 DO 70 IY = 1, NINC
613 INCY = INC( IY )
855 $ INCYS, IX, IY, K, KS, LAA, LDA, LDAS, LX, LY, local
954 DO 70 IY = 1, NINC
955 INCY = INC( IY )
1595 $ IY, J, LAA, LDA, LDAS, LX, LY, M, MS, N, NARGS, local
1656 DO 90 IY = 1, NINC
1657 INCY = INC( IY )
2167 $ IY, J, JA, JJ, LAA, LDA, LDAS, LJ, LX, LY, N, local
2242 DO 110 IY = 1, NINC
2243 INCY = INC( IY )
2485 INTEGER I, INCXL, INCYL, IY, J, JX, KX, KY, ML, NL local
2521 IY = KY
2523 YT( IY ) = ZERO
2524 G( IY ) = RZERO
2528 YT( IY ) = YT( IY ) + A( J, I )*X( JX )
2529 G( IY ) = G( IY ) + ABS1( A( J, I ) )*ABS1( X( JX ) )
2534 YT( IY ) = YT( IY ) + DCONJG( A( J, I ) )*X( JX )
2535 G( IY ) = G( IY ) + ABS1( A( J, I ) )*ABS1( X( JX ) )
2540 YT( IY ) = YT( IY ) + A( I, J )*X( JX )
2541 G( IY ) = G( IY ) + ABS1( A( I, J ) )*ABS1( X( JX ) )
2545 YT( IY ) = ALPHA*YT( IY ) + BETA*Y( IY )
2546 G( IY ) = ABS1( ALPHA )*G( IY ) + ABS1( BETA )*ABS1( Y( IY ) )
2547 IY = IY + INCYL