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
195 * Values of BETA
198 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
442 9988 FORMAT( ' FOR BETA ',
495 COMPLEX ALPHA, ALS, BETA, BLS, TRANSL
619 BETA = BET( IB )
647 BLS = BETA
658 $ CTRANS, M, N, ALPHA, LDA, INCX, BETA,
664 $ BETA, YY, INCY )
669 $ INCX, BETA, INCY
674 $ INCX, BETA, YY, INCY )
697 ISAME( 9 ) = BLS.EQ.BETA
714 ISAME( 11 ) = BLS.EQ.BETA
744 $ NMAX, X, INCX, BETA, Y,
788 $ INCX, BETA, INCY
791 $ ALPHA, LDA, INCX, BETA, INCY
850 COMPLEX ALPHA, ALS, BETA, BLS, TRANSL
960 BETA = BET( IB )
986 BLS = BETA
997 $ CUPLO, N, ALPHA, LDA, INCX, BETA, INCY
1001 $ LDA, XX, INCX, BETA, YY,
1006 $ CUPLO, N, K, ALPHA, LDA, INCX, BETA,
1011 $ AA, LDA, XX, INCX, BETA,
1016 $ CUPLO, N, ALPHA, INCX, BETA, INCY
1020 $ XX, INCX, BETA, YY, INCY )
1041 ISAME( 8 ) = BLS.EQ.BETA
1056 ISAME( 9 ) = BLS.EQ.BETA
1069 ISAME( 7 ) = BLS.EQ.BETA
1098 $ INCX, BETA, Y, INCY, YT, G,
1138 $ BETA, INCY
1141 $ INCX, BETA, INCY
1144 $ BETA, INCY
2451 SUBROUTINE CMVCH( TRANS, M, N, ALPHA, A, NMAX, X, INCX, BETA, Y,
2468 COMPLEX ALPHA, BETA
2539 YT( IY ) = ALPHA*YT( IY ) + BETA*Y( IY )
2540 G( IY ) = ABS1( ALPHA )*G( IY ) + ABS1( BETA )*ABS1( Y( IY ) )
