Lines Matching refs:YY
139 $ YY( NMAX*INCMAX ), Z( 2*NMAX ) variable
298 YY( J ) = J*( ( J + 1 )*J )/2 - ( ( J + 1 )*J*( J - 1 ) )/3
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 ) argument
458 $ YY( NMAX*INCMAX ) local
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 ) argument
799 $ YY( NMAX*INCMAX ) local
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, argument
1497 $ YY( NMAX*INCMAX ), Z( NMAX ) local
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, argument
1758 $ YY( NMAX*INCMAX ), Z( NMAX ) local
2012 $ INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G, argument
2036 $ YY( NMAX*INCMAX ), Z( NMAX, 2 ) local
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 ) argument
2848 $ YY( * ) local
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)