Lines Matching refs:BETA

21 *  3                 NUMBER OF VALUES OF BETA
22 * (0.0,0.0) (1.0,0.0) (1.3,-1.1) VALUES OF BETA
147 * Values of BETA
150 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
404 9992 FORMAT( ' FOR BETA ',
459 COMPLEX ALPHA, ALS, BETA, BLS
562 BETA = BET( IB )
588 BLS = BETA
599 $ LDB, BETA, LDC)
604 $ BETA, CC, LDC )
626 ISAME( 11 ) = BLS.EQ.BETA
654 $ ALPHA, A, NMAX, B, NMAX, BETA,
692 $ M, N, K, ALPHA, LDA, LDB, BETA, LDC)
721 $ K, ALPHA, LDA, LDB, BETA, LDC)
723 COMPLEX ALPHA, BETA
748 WRITE(NOUT, FMT = 9994)M, N, K, ALPHA, LDA, LDB, BETA, LDC
789 COMPLEX ALPHA, ALS, BETA, BLS
879 BETA = BET( IB )
904 BLS = BETA
915 $ BETA, LDC)
920 $ ALPHA, AA, LDA, BB, LDB, BETA,
924 $ ALPHA, AA, LDA, BB, LDB, BETA,
947 ISAME( 10 ) = BLS.EQ.BETA
976 $ NMAX, B, NMAX, BETA, C, NMAX,
981 $ NMAX, A, NMAX, BETA, C, NMAX,
1018 $ LDB, BETA, LDC)
1047 $ ALPHA, LDA, LDB, BETA, LDC)
1049 COMPLEX ALPHA, BETA
1070 WRITE(NOUT, FMT = 9994)M, N, ALPHA, LDA, LDB, BETA, LDC
1474 COMPLEX ALPHA, ALS, BETA, BETS
1558 BETA = BET( IB )
1560 RBETA = REAL( BETA )
1561 BETA = CMPLX( RBETA, RZERO )
1593 BETS = BETA
1615 $ UPLO, TRANS, N, K, ALPHA, LDA, BETA, LDC)
1619 $ ALPHA, AA, LDA, BETA, CC, LDC )
1646 ISAME( 8 ) = BETS.EQ.BETA
1691 $ A( 1, J ), NMAX, BETA,
1698 $ A( J, 1 ), NMAX, BETA,
1750 $ LDA, BETA, LDC)
1784 $ N, K, ALPHA, LDA, BETA, LDC)
1786 COMPLEX ALPHA, BETA
1809 WRITE(NOUT, FMT = 9994)N, K, ALPHA, LDA, BETA, LDC
1818 $ N, K, ALPHA, LDA, BETA, LDC)
1820 REAL ALPHA, BETA
1843 WRITE(NOUT, FMT = 9994)N, K, ALPHA, LDA, BETA, LDC
1884 COMPLEX ALPHA, ALS, BETA, BETS
1981 BETA = BET( IB )
1983 RBETA = REAL( BETA )
1984 BETA = CMPLX( RBETA, RZERO )
2016 BETS = BETA
2039 $ BETA, LDC)
2043 $ ALPHA, AA, LDA, BB, LDB, BETA,
2069 ISAME( 10 ) = BETS.EQ.BETA
2128 $ 2*NMAX, BETA, C( JJ, J ),
2150 $ BETA, C( JJ, J ), NMAX, CT,
2203 $ ALPHA, LDA, LDB, BETA, LDC)
2237 $ N, K, ALPHA, LDA, LDB, BETA, LDC)
2239 COMPLEX ALPHA, BETA
2262 WRITE(NOUT, FMT = 9994)N, K, ALPHA, LDA, LDB, BETA, LDC
2271 $ N, K, ALPHA, LDA, LDB, BETA, LDC)
2274 REAL BETA
2297 WRITE(NOUT, FMT = 9994)N, K, ALPHA, LDA, LDB, BETA, LDC
2433 $ BETA, C, LDC, CT, G, CC, LDCC, EPS, ERR, FATAL,
2452 COMPLEX ALPHA, BETA
2572 CT( I ) = ALPHA*CT( I ) + BETA*C( I, J )
2574 $ ABS1( BETA )*ABS1( C( I, J ) )