Lines Matching refs:YY
143 $ YY( NMAX*INCMAX ), Z( 2*NMAX ) variable
304 YY( J ) = J*( ( J + 1 )*J )/2 - ( ( J + 1 )*J*( J - 1 ) )/3
310 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
311 SAME = LZE( YY, YT, N )
318 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
319 SAME = LZE( YY, YT, N )
350 $ X, XX, XS, Y, YY, YS, YT, G )
356 $ X, XX, XS, Y, YY, YS, YT, G )
362 $ NMAX, INCMAX, A, AA, AS, Y, YY, YS, YT, G, Z )
367 $ NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS,
373 $ NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS,
379 $ NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS,
441 $ XS, Y, YY, YS, YT, G ) argument
468 $ YY( NMAX*INCMAX ) local
594 $ YY, ABS( INCY ), 0, ML - 1,
618 YS( I ) = YY( I )
632 $ LDA, XX, INCX, BETA, YY,
643 $ YY, INCY )
667 ISAME( 10 ) = LZE( YS, YY, LY )
670 $ ML, YS, YY,
684 ISAME( 12 ) = LZE( YS, YY, LY )
687 $ ML, YS, YY,
713 $ INCY, YT, G, YY, EPS, ERR,
787 $ XS, Y, YY, YS, YT, G ) argument
814 $ YY( NMAX*INCMAX ) local
927 CALL ZMAKE( 'GE', ' ', ' ', 1, N, Y, 1, YY,
950 YS( I ) = YY( I )
963 $ INCX, BETA, YY, INCY )
972 $ XX, INCX, BETA, YY, INCY )
980 $ BETA, YY, INCY )
1003 ISAME( 9 ) = LZE( YS, YY, LY )
1006 $ YS, YY, ABS( INCY ) )
1018 ISAME( 10 ) = LZE( YS, YY, LY )
1021 $ YS, YY, ABS( INCY ) )
1031 ISAME( 8 ) = LZE( YS, YY, LY )
1034 $ YS, YY, ABS( INCY ) )
1059 $ YY, EPS, ERR, FATAL, NOUT,
1497 $ INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G, argument
1525 $ YY( NMAX*INCMAX ), Z( NMAX ) local
1600 CALL ZMAKE( 'GE', ' ', ' ', 1, N, Y, 1, YY,
1604 YY( 1 + ABS( INCY )*( N/2 - 1 ) ) = ZERO
1632 YS( I ) = YY( I )
1644 CALL ZGERC( M, N, ALPHA, XX, INCX, YY, INCY, AA,
1649 CALL ZGERU( M, N, ALPHA, XX, INCX, YY, INCY, AA,
1668 ISAME( 6 ) = LZE( YS, YY, LY )
1775 $ INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G, argument
1803 $ YY( NMAX*INCMAX ), Z( NMAX ) local
2060 $ INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G, argument
2088 $ YY( NMAX*INCMAX ), Z( NMAX, 2 ) local
2171 CALL ZMAKE( 'GE', ' ', ' ', 1, N, Y, 1, YY,
2175 YY( 1 + ABS( INCY )*( N/2 - 1 ) ) = ZERO
2205 YS( I ) = YY( I )
2217 CALL ZHER2( UPLO, N, ALPHA, XX, INCX, YY, INCY,
2225 CALL ZHPR2( UPLO, N, ALPHA, XX, INCX, YY, INCY,
2244 ISAME( 6 ) = LZE( YS, YY, LY )
2918 $ INCY, YT, G, YY, EPS, ERR, FATAL, NOUT, MV ) argument
2940 COMPLEX*16 A( NMAX, * ), X( * ), Y( * ), YT( * ), YY( * ) local
3014 ERRI = ABS( YT( I ) - YY( 1 + ( I - 1 )*ABS( INCY ) ) )/EPS
3031 $ YY( 1 + ( I - 1 )*ABS( INCY ) )
3034 $ YY( 1 + ( I - 1 )*ABS( INCY ) ), YT( I )