Lines Matching refs:YT
141 $ YS( NMAX*INCMAX ), YT( NMAX ),
305 * YY holds the exact result. On exit from CMVCH YT holds
308 CALL CMVCH( TRANS, N, N, ONE, A, NMAX, X, 1, ZERO, Y, 1, YT, G,
310 SAME = LCE( YY, YT, N )
316 CALL CMVCH( TRANS, N, N, ONE, A, NMAX, X, -1, ZERO, Y, -1, YT, G,
318 SAME = LCE( YY, YT, N )
349 $ X, XX, XS, Y, YY, YS, YT, G )
355 $ X, XX, XS, Y, YY, YS, YT, G )
361 $ NMAX, INCMAX, A, AA, AS, Y, YY, YS, YT, G, Z )
367 $ YT, G, Z )
373 $ YT, G, Z )
379 $ YT, G, Z )
440 $ XS, Y, YY, YS, YT, G )
465 $ Y( NMAX ), YS( NMAX*INCMAX ), YT( NMAX ),
711 $ INCY, YT, G, YY, EPS, ERR,
785 $ XS, Y, YY, YS, YT, G )
810 $ Y( NMAX ), YS( NMAX*INCMAX ), YT( NMAX ),
1055 $ INCX, BETA, Y, INCY, YT, G,
1493 $ INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G,
1519 $ YS( NMAX*INCMAX ), YT( NMAX ),
1708 $ ONE, A( 1, J ), 1, YT, G,
1770 $ INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G,
1796 $ YS( NMAX*INCMAX ), YT( NMAX ),
1979 $ 1, ONE, A( JJ, J ), 1, YT, G,
2054 $ INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G,
2080 $ YS( NMAX*INCMAX ), YT( NMAX ),
2297 $ YT, G, AA( JA ), EPS, ERR, FATAL,
2910 $ INCY, YT, G, YY, EPS, ERR, FATAL, NOUT, MV )
2932 COMPLEX A( NMAX, * ), X( * ), Y( * ), YT( * ), YY( * )
2970 * Compute expected result in YT using data in A, X and Y.
2975 YT( IY ) = ZERO
2980 YT( IY ) = YT( IY ) + A( J, I )*X( JX )
2986 YT( IY ) = YT( IY ) + CONJG( A( J, I ) )*X( JX )
2992 YT( IY ) = YT( IY ) + A( I, J )*X( JX )
2997 YT( IY ) = ALPHA*YT( IY ) + BETA*Y( IY )
3006 ERRI = ABS( YT( I ) - YY( 1 + ( I - 1 )*ABS( INCY ) ) )/EPS
3022 WRITE( NOUT, FMT = 9998 )I, YT( I ),
3026 $ YY( 1 + ( I - 1 )*ABS( INCY ) ), YT( I )