Lines Matching refs:YY
96 $ YY( NMAX*INCMAX ), Z( 2*NMAX )
264 YY( J ) = J*( ( J + 1 )*J )/2 - ( ( J + 1 )*J*( J - 1 ) )/3
266 * YY holds the exact result. On exit from CMVCH YT holds
270 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
271 SAME = LCE( YY, YT, N )
278 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
279 SAME = LCE( YY, YT, N )
310 $ X, XX, XS, Y, YY, YS, YT, G )
316 $ X, XX, XS, Y, YY, YS, YT, G )
322 $ NMAX, INCMAX, A, AA, AS, Y, YY, YS, YT, G, Z )
327 $ NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS,
333 $ NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS,
339 $ NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS,
401 $ XS, Y, YY, YS, YT, G )
427 $ YY( NMAX*INCMAX )
553 $ YY, ABS( INCY ), 0, ML - 1,
577 YS( I ) = YY( I )
591 $ LDA, XX, INCX, BETA, YY,
602 $ YY, INCY )
626 ISAME( 10 ) = LCE( YS, YY, LY )
629 $ ML, YS, YY,
643 ISAME( 12 ) = LCE( YS, YY, LY )
646 $ ML, YS, YY,
672 $ INCY, YT, G, YY, EPS, ERR,
746 $ XS, Y, YY, YS, YT, G )
772 $ YY( NMAX*INCMAX )
885 CALL CMAKE( 'GE', ' ', ' ', 1, N, Y, 1, YY,
908 YS( I ) = YY( I )
921 $ INCX, BETA, YY, INCY )
930 $ XX, INCX, BETA, YY, INCY )
938 $ BETA, YY, INCY )
961 ISAME( 9 ) = LCE( YS, YY, LY )
964 $ YS, YY, ABS( INCY ) )
976 ISAME( 10 ) = LCE( YS, YY, LY )
979 $ YS, YY, ABS( INCY ) )
989 ISAME( 8 ) = LCE( YS, YY, LY )
992 $ YS, YY, ABS( INCY ) )
1017 $ YY, EPS, ERR, FATAL, NOUT,
1454 $ INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G,
1481 $ YY( NMAX*INCMAX ), Z( NMAX )
1556 CALL CMAKE( 'GE', ' ', ' ', 1, N, Y, 1, YY,
1560 YY( 1 + ABS( INCY )*( N/2 - 1 ) ) = ZERO
1588 YS( I ) = YY( I )
1600 CALL CGERC( M, N, ALPHA, XX, INCX, YY, INCY, AA,
1605 CALL CGERU( M, N, ALPHA, XX, INCX, YY, INCY, AA,
1624 ISAME( 6 ) = LCE( YS, YY, LY )
1731 $ INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G,
1758 $ YY( NMAX*INCMAX ), Z( NMAX )
2015 $ INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G,
2042 $ YY( NMAX*INCMAX ), Z( NMAX, 2 )
2125 CALL CMAKE( 'GE', ' ', ' ', 1, N, Y, 1, YY,
2129 YY( 1 + ABS( INCY )*( N/2 - 1 ) ) = ZERO
2159 YS( I ) = YY( I )
2171 CALL CHER2( UPLO, N, ALPHA, XX, INCX, YY, INCY,
2179 CALL CHPR2( UPLO, N, ALPHA, XX, INCX, YY, INCY,
2198 ISAME( 6 ) = LCE( YS, YY, LY )
2871 $ INCY, YT, G, YY, EPS, ERR, FATAL, NOUT, MV )
2893 COMPLEX A( NMAX, * ), X( * ), Y( * ), YT( * ), YY( * )
2967 ERRI = ABS( YT( I ) - YY( 1 + ( I - 1 )*ABS( INCY ) ) )/EPS
2984 $ YY( 1 + ( I - 1 )*ABS( INCY ) )
2987 $ YY( 1 + ( I - 1 )*ABS( INCY ) ), YT( I )