Lines Matching refs:ALPHA
447 REAL ALPHA, ALS, BETA, BLS, ERR, ERRMAX local
546 ALPHA = ALF( IA )
566 ALS = ALPHA
585 $ TRANSA, TRANSB, M, N, K, ALPHA, LDA,
590 $ K, ALPHA, AA, LDA, BB, LDB,
608 ISAME( 6 ) = ALS.EQ.ALPHA
641 $ ALPHA, A, NMAX, B, NMAX, BETA,
679 $ M, N, K, ALPHA, LDA, LDB, BETA, LDC)
710 $ K, ALPHA, LDA, LDB, BETA, LDC) argument
712 REAL ALPHA, BETA local
737 WRITE(NOUT, FMT = 9994)M, N, K, ALPHA, LDA, LDB, BETA, LDC
775 REAL ALPHA, ALS, BETA, BLS, ERR, ERRMAX local
861 ALPHA = ALF( IA )
880 ALS = ALPHA
899 $ SIDE, UPLO, M, N, ALPHA, LDA, LDB,
903 CALL CSSYMM( IORDER, SIDE, UPLO, M, N, ALPHA,
920 ISAME( 5 ) = ALS.EQ.ALPHA
953 CALL SMMCH( 'N', 'N', M, N, M, ALPHA, A,
958 CALL SMMCH( 'N', 'N', M, N, N, ALPHA, B,
995 CALL SPRCN2(NOUT, NC, SNAME, IORDER, SIDE, UPLO, M, N, ALPHA, LDA,
1025 $ ALPHA, LDA, LDB, BETA, LDC) argument
1027 REAL ALPHA, BETA local
1048 WRITE(NOUT, FMT = 9994)M, N, ALPHA, LDA, LDB, BETA, LDC
1084 REAL ALPHA, ALS, ERR, ERRMAX local
1164 ALPHA = ALF( IA )
1187 ALS = ALPHA
1202 $ SIDE, UPLO, TRANSA, DIAG, M, N, ALPHA,
1207 $ DIAG, M, N, ALPHA, AA, LDA,
1212 $ SIDE, UPLO, TRANSA, DIAG, M, N, ALPHA,
1217 $ DIAG, M, N, ALPHA, AA, LDA,
1237 ISAME( 7 ) = ALS.EQ.ALPHA
1269 $ ALPHA, A, NMAX, B, NMAX,
1275 $ ALPHA, B, NMAX, A, NMAX,
1289 BB( I + ( J - 1 )*LDB ) = ALPHA*
1343 $ M, N, ALPHA, LDA, LDB)
1371 $ DIAG, M, N, ALPHA, LDA, LDB) argument
1373 REAL ALPHA local
1406 WRITE(NOUT, FMT = 9994)CA, CD, M, N, ALPHA, LDA, LDB
1444 REAL ALPHA, ALS, BETA, BETS, ERR, ERRMAX local
1519 ALPHA = ALF( IA )
1537 ALS = ALPHA
1552 $ TRANS, N, K, ALPHA, LDA, BETA, LDC)
1555 CALL CSSYRK( IORDER, UPLO, TRANS, N, K, ALPHA,
1572 ISAME( 5 ) = ALS.EQ.ALPHA
1612 CALL SMMCH( 'T', 'N', LJ, 1, K, ALPHA,
1619 CALL SMMCH( 'N', 'T', LJ, 1, K, ALPHA,
1668 CALL SPRCN4( NOUT, NC, SNAME, IORDER, UPLO, TRANS, N, K, ALPHA,
1698 $ N, K, ALPHA, LDA, BETA, LDC) argument
1700 REAL ALPHA, BETA local
1723 WRITE(NOUT, FMT = 9994)N, K, ALPHA, LDA, BETA, LDC
1761 REAL ALPHA, ALS, BETA, BETS, ERR, ERRMAX local
1853 ALPHA = ALF( IA )
1871 ALS = ALPHA
1890 $ TRANS, N, K, ALPHA, LDA, LDB, BETA, LDC)
1893 CALL CSSYR2K( IORDER, UPLO, TRANS, N, K, ALPHA,
1910 ISAME( 5 ) = ALS.EQ.ALPHA
1960 $ ALPHA, AB( JJAB ), 2*NMAX,
1973 $ ALPHA, AB( JJ ), NMAX, W,
2023 CALL SPRCN5( NOUT, NC, SNAME, IORDER, UPLO, TRANS, N, K, ALPHA,
2054 $ N, K, ALPHA, LDA, LDB, BETA, LDC) argument
2056 REAL ALPHA, BETA local
2079 WRITE(NOUT, FMT = 9994)N, K, ALPHA, LDA, LDB, BETA, LDC
2199 SUBROUTINE SMMCH( TRANSA, TRANSB, M, N, KK, ALPHA, A, LDA, B, LDB, argument
2217 REAL ALPHA, BETA, EPS, ERR local
2274 CT( I ) = ALPHA*CT( I ) + BETA*C( I, J )
2275 G( I ) = ABS( ALPHA )*G( I ) + ABS( BETA )*ABS( C( I, J ) )