Lines Matching refs:BETA
25 * 3 NUMBER OF VALUES OF BETA
26 * (0.0,0.0) (1.0,0.0) (1.3,-1.1) VALUES OF BETA
196 * Values of BETA
199 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
442 9988 FORMAT( ' FOR BETA ',
496 COMPLEX*16 ALPHA, ALS, BETA, BLS, TRANSL
620 BETA = BET( IB )
648 BLS = BETA
659 $ CTRANS, M, N, ALPHA, LDA, INCX, BETA,
665 $ BETA, YY, INCY )
670 $ INCX, BETA, INCY
675 $ INCX, BETA, YY, INCY )
698 ISAME( 9 ) = BLS.EQ.BETA
715 ISAME( 11 ) = BLS.EQ.BETA
745 $ NMAX, X, INCX, BETA, Y,
789 $ INCX, BETA, INCY
792 $ ALPHA, LDA, INCX, BETA, INCY
852 COMPLEX*16 ALPHA, ALS, BETA, BLS, TRANSL
962 BETA = BET( IB )
988 BLS = BETA
999 $ CUPLO, N, ALPHA, LDA, INCX, BETA, INCY
1003 $ LDA, XX, INCX, BETA, YY,
1008 $ CUPLO, N, K, ALPHA, LDA, INCX, BETA,
1013 $ AA, LDA, XX, INCX, BETA,
1018 $ CUPLO, N, ALPHA, INCX, BETA, INCY
1022 $ XX, INCX, BETA, YY, INCY )
1043 ISAME( 8 ) = BLS.EQ.BETA
1058 ISAME( 9 ) = BLS.EQ.BETA
1071 ISAME( 7 ) = BLS.EQ.BETA
1100 $ INCX, BETA, Y, INCY, YT, G,
1140 $ BETA, INCY
1143 $ INCX, BETA, INCY
1146 $ BETA, INCY
2457 SUBROUTINE ZMVCH( TRANS, M, N, ALPHA, A, NMAX, X, INCX, BETA, Y,
2474 COMPLEX*16 ALPHA, BETA
2545 YT( IY ) = ALPHA*YT( IY ) + BETA*Y( IY )
2546 G( IY ) = ABS1( ALPHA )*G( IY ) + ABS1( BETA )*ABS1( Y( IY ) )
