Lines Matching refs:IY
436 $ INCYS, IX, IY, KL, KLS, KU, KUS, LAA, LDA, local
541 DO 70 IY = 1, NINC
542 INCY = INC( IY )
782 $ INCYS, IX, IY, K, KS, LAA, LDA, LDAS, LX, LY, local
875 DO 70 IY = 1, NINC
876 INCY = INC( IY )
1493 $ IY, J, LAA, LDA, LDAS, LX, LY, M, MS, N, NARGS, local
1554 DO 90 IY = 1, NINC
1555 INCY = INC( IY )
2056 $ IY, J, JA, JJ, LAA, LDA, LDAS, LJ, LX, LY, N, local
2125 DO 110 IY = 1, NINC
2126 INCY = INC( IY )
2906 INTEGER I, INCXL, INCYL, IY, J, JX, KX, KY, ML, NL local
2942 IY = KY
2944 YT( IY ) = ZERO
2945 G( IY ) = RZERO
2949 YT( IY ) = YT( IY ) + A( J, I )*X( JX )
2950 G( IY ) = G( IY ) + ABS1( A( J, I ) )*ABS1( X( JX ) )
2955 YT( IY ) = YT( IY ) + DCONJG( A( J, I ) )*X( JX )
2956 G( IY ) = G( IY ) + ABS1( A( J, I ) )*ABS1( X( JX ) )
2961 YT( IY ) = YT( IY ) + A( I, J )*X( JX )
2962 G( IY ) = G( IY ) + ABS1( A( I, J ) )*ABS1( X( JX ) )
2966 YT( IY ) = ALPHA*YT( IY ) + BETA*Y( IY )
2967 G( IY ) = ABS1( ALPHA )*G( IY ) + ABS1( BETA )*ABS1( Y( IY ) )
2968 IY = IY + INCYL