Lines Matching defs:YT
95 $ YS( NMAX*INCMAX ), YT( NMAX ),
266 * YY holds the exact result. On exit from CMVCH YT holds
269 CALL CMVCH( TRANS, N, N, ONE, A, NMAX, X, 1, ZERO, Y, 1, YT, G,
271 SAME = LCE( YY, YT, N )
277 CALL CMVCH( TRANS, N, N, ONE, A, NMAX, X, -1, ZERO, Y, -1, YT, G,
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 )
328 $ YT, G, Z )
334 $ YT, G, Z )
340 $ YT, G, Z )
401 $ XS, Y, YY, YS, YT, G )
426 $ Y( NMAX ), YS( NMAX*INCMAX ), YT( NMAX ),
672 $ INCY, YT, G, YY, EPS, ERR,
746 $ XS, Y, YY, YS, YT, G )
771 $ Y( NMAX ), YS( NMAX*INCMAX ), YT( NMAX ),
1016 $ INCX, BETA, Y, INCY, YT, G,
1454 $ INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G,
1480 $ YS( NMAX*INCMAX ), YT( NMAX ),
1669 $ ONE, A( 1, J ), 1, YT, G,
1731 $ INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G,
1757 $ YS( NMAX*INCMAX ), YT( NMAX ),
1940 $ 1, ONE, A( JJ, J ), 1, YT, G,
2015 $ INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G,
2041 $ YS( NMAX*INCMAX ), YT( NMAX ),
2258 $ YT, G, AA( JA ), EPS, ERR, FATAL,
2871 $ INCY, YT, G, YY, EPS, ERR, FATAL, NOUT, MV )
2893 COMPLEX A( NMAX, * ), X( * ), Y( * ), YT( * ), YY( * )
2931 * Compute expected result in YT using data in A, X and Y.
2936 YT( IY ) = ZERO
2941 YT( IY ) = YT( IY ) + A( J, I )*X( JX )
2947 YT( IY ) = YT( IY ) + CONJG( A( J, I ) )*X( JX )
2953 YT( IY ) = YT( IY ) + A( I, J )*X( JX )
2958 YT( IY ) = ALPHA*YT( IY ) + BETA*Y( IY )
2967 ERRI = ABS( YT( I ) - YY( 1 + ( I - 1 )*ABS( INCY ) ) )/EPS
2983 WRITE( NOUT, FMT = 9998 )I, YT( I ),
2987 $ YY( 1 + ( I - 1 )*ABS( INCY ) ), YT( I )
