Lines Matching refs:RBETA
1475 REAL ERR, ERRMAX, RALPHA, RALS, RBETA, RBETS local
1560 RBETA = REAL( BETA )
1561 BETA = CMPLX( RBETA, RZERO )
1566 $ RZERO ).AND.RBETA.EQ.RONE )
1591 RBETS = RBETA
1605 $ UPLO, TRANS, N, K, RALPHA, LDA, RBETA,
1610 $ RALPHA, AA, LDA, RBETA, CC,
1644 ISAME( 8 ) = RBETS.EQ.RBETA
1885 REAL ERR, ERRMAX, RBETA, RBETS local
1983 RBETA = REAL( BETA )
1984 BETA = CMPLX( RBETA, RZERO )
1989 $ ZERO ).AND.RBETA.EQ.RONE )
2014 RBETS = RBETA
2029 $ RBETA, LDC)
2033 $ ALPHA, AA, LDA, BB, LDB, RBETA,
2067 ISAME( 10 ) = RBETS.EQ.RBETA
2200 $ ALPHA, LDA, LDB, RBETA, LDC)