Lines Matching refs:YY
139 $ YY( NMAX*INCMAX ), Z( 2*NMAX )
298 YY( J ) = J*( ( J + 1 )*J )/2 - ( ( J + 1 )*J*( J - 1 ) )/3
300 * YY holds the exact result. On exit from SMVCH YT holds
304 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
305 SAME = LSE( YY, YT, N )
312 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
313 SAME = LSE( YY, YT, N )
344 $ X, XX, XS, Y, YY, YS, YT, G )
350 $ X, XX, XS, Y, YY, YS, YT, G )
356 $ NMAX, INCMAX, A, AA, AS, Y, YY, YS, YT, G, Z )
361 $ NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS,
367 $ NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS,
373 $ NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS,
433 $ XS, Y, YY, YS, YT, G )
458 $ YY( NMAX*INCMAX )
582 $ YY, ABS( INCY ), 0, ML - 1,
606 YS( I ) = YY( I )
620 $ LDA, XX, INCX, BETA, YY,
631 $ YY, INCY )
655 ISAME( 10 ) = LSE( YS, YY, LY )
658 $ ML, YS, YY,
672 ISAME( 12 ) = LSE( YS, YY, LY )
675 $ ML, YS, YY,
701 $ INCY, YT, G, YY, EPS, ERR,
774 $ XS, Y, YY, YS, YT, G )
799 $ YY( NMAX*INCMAX )
910 CALL SMAKE( 'GE', ' ', ' ', 1, N, Y, 1, YY,
933 YS( I ) = YY( I )
946 $ INCX, BETA, YY, INCY )
955 $ XX, INCX, BETA, YY, INCY )
963 $ BETA, YY, INCY )
986 ISAME( 9 ) = LSE( YS, YY, LY )
989 $ YS, YY, ABS( INCY ) )
1001 ISAME( 10 ) = LSE( YS, YY, LY )
1004 $ YS, YY, ABS( INCY ) )
1014 ISAME( 8 ) = LSE( YS, YY, LY )
1017 $ YS, YY, ABS( INCY ) )
1042 $ YY, EPS, ERR, FATAL, NOUT,
1473 $ INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G,
1497 $ YY( NMAX*INCMAX ), Z( NMAX )
1569 CALL SMAKE( 'GE', ' ', ' ', 1, N, Y, 1, YY,
1573 YY( 1 + ABS( INCY )*( N/2 - 1 ) ) = ZERO
1601 YS( I ) = YY( I )
1612 CALL SGER( M, N, ALPHA, XX, INCX, YY, INCY, AA,
1630 ISAME( 6 ) = LSE( YS, YY, LY )
1734 $ INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G,
1758 $ YY( NMAX*INCMAX ), Z( NMAX )
2012 $ INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G,
2036 $ YY( NMAX*INCMAX ), Z( NMAX, 2 )
2117 CALL SMAKE( 'GE', ' ', ' ', 1, N, Y, 1, YY,
2121 YY( 1 + ABS( INCY )*( N/2 - 1 ) ) = ZERO
2151 YS( I ) = YY( I )
2163 CALL SSYR2( UPLO, N, ALPHA, XX, INCX, YY, INCY,
2171 CALL SSPR2( UPLO, N, ALPHA, XX, INCX, YY, INCY,
2190 ISAME( 6 ) = LSE( YS, YY, LY )
2828 $ INCY, YT, G, YY, EPS, ERR, FATAL, NOUT, MV )
2848 $ YY( * )
2909 ERRI = ABS( YT( I ) - YY( 1 + ( I - 1 )*ABS( INCY ) ) )/EPS
2926 $ YY( 1 + ( I - 1 )*ABS( INCY ) )
2929 $ YY( 1 + ( I - 1 )*ABS( INCY ) ), YT(I)