Lines Matching defs:ALPHA
24 * 3 NUMBER OF VALUES OF ALPHA
25 * 0.0 1.0 0.7 VALUES OF ALPHA
186 * Values of ALPHA
189 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX
371 9989 FORMAT( ' FOR ALPHA ', 7F6.1 )
422 REAL ALPHA, ALS, BETA, BLS, ERR, ERRMAX, TRANSL
534 ALPHA = ALF( IA )
556 ALS = ALPHA
576 $ TRANS, M, N, ALPHA, LDA, INCX, BETA,
580 CALL SGEMV( TRANS, M, N, ALPHA, AA,
586 $ TRANS, M, N, KL, KU, ALPHA, LDA,
590 CALL SGBMV( TRANS, M, N, KL, KU, ALPHA,
609 ISAME( 4 ) = ALS.EQ.ALPHA
626 ISAME( 6 ) = ALS.EQ.ALPHA
660 CALL SMVCH( TRANS, M, N, ALPHA, A,
703 WRITE( NOUT, FMT = 9994 )NC, SNAME, TRANS, M, N, ALPHA, LDA,
707 $ ALPHA, LDA, INCX, BETA, INCY
763 REAL ALPHA, ALS, BETA, BLS, ERR, ERRMAX, TRANSL
863 ALPHA = ALF( IA )
883 ALS = ALPHA
903 $ UPLO, N, ALPHA, LDA, INCX, BETA, INCY
906 CALL SSYMV( UPLO, N, ALPHA, AA, LDA, XX,
911 $ UPLO, N, K, ALPHA, LDA, INCX, BETA,
915 CALL SSBMV( UPLO, N, K, ALPHA, AA, LDA,
920 $ UPLO, N, ALPHA, INCX, BETA, INCY
923 CALL SSPMV( UPLO, N, ALPHA, AA, XX, INCX,
940 ISAME( 3 ) = ALS.EQ.ALPHA
955 ISAME( 4 ) = ALS.EQ.ALPHA
969 ISAME( 3 ) = ALS.EQ.ALPHA
1001 CALL SMVCH( 'N', N, N, ALPHA, A, NMAX, X,
1041 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, LDA, INCX,
1044 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, K, ALPHA, LDA,
1047 WRITE( NOUT, FMT = 9995 )NC, SNAME, UPLO, N, ALPHA, INCX,
1461 REAL ALPHA, ALS, ERR, ERRMAX, TRANSL
1538 ALPHA = ALF( IA )
1552 ALS = ALPHA
1570 $ ALPHA, INCX, INCY, LDA
1573 CALL SGER( M, N, ALPHA, XX, INCX, YY, INCY, AA,
1588 ISAME( 3 ) = ALS.EQ.ALPHA
1633 CALL SMVCH( 'N', M, 1, ALPHA, Z, NMAX, W, 1,
1671 WRITE( NOUT, FMT = 9994 )NC, SNAME, M, N, ALPHA, INCX, INCY, LDA
1722 REAL ALPHA, ALS, ERR, ERRMAX, TRANSL
1793 ALPHA = ALF( IA )
1794 NULL = N.LE.0.OR.ALPHA.EQ.ZERO
1808 ALS = ALPHA
1823 $ ALPHA, INCX, LDA
1826 CALL SSYR( UPLO, N, ALPHA, XX, INCX, AA, LDA )
1830 $ ALPHA, INCX
1833 CALL SSPR( UPLO, N, ALPHA, XX, INCX, AA )
1848 ISAME( 3 ) = ALS.EQ.ALPHA
1897 CALL SMVCH( 'N', LJ, 1, ALPHA, Z( JJ ), LJ, W,
1944 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, INCX, LDA
1946 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, ALPHA, INCX
2000 REAL ALPHA, ALS, ERR, ERRMAX, TRANSL
2086 ALPHA = ALF( IA )
2087 NULL = N.LE.0.OR.ALPHA.EQ.ZERO
2102 ALS = ALPHA
2121 $ ALPHA, INCX, INCY, LDA
2124 CALL SSYR2( UPLO, N, ALPHA, XX, INCX, YY, INCY,
2129 $ ALPHA, INCX, INCY
2132 CALL SSPR2( UPLO, N, ALPHA, XX, INCX, YY, INCY,
2148 ISAME( 3 ) = ALS.EQ.ALPHA
2209 CALL SMVCH( 'N', LJ, 2, ALPHA, Z( JJ, 1 ),
2258 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, INCX,
2261 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, ALPHA, INCX, INCY
2290 * ALPHA, BETA, A, X and Y should not need to be defined.
2305 REAL ALPHA, BETA
2325 CALL SGEMV( '/', 0, 0, ALPHA, A, 1, X, 1, BETA, Y, 1 )
2328 CALL SGEMV( 'N', -1, 0, ALPHA, A, 1, X, 1, BETA, Y, 1 )
2331 CALL SGEMV( 'N', 0, -1, ALPHA, A, 1, X, 1, BETA, Y, 1 )
2334 CALL SGEMV( 'N', 2, 0, ALPHA, A, 1, X, 1, BETA, Y, 1 )
2337 CALL SGEMV( 'N', 0, 0, ALPHA, A, 1, X, 0, BETA, Y, 1 )
2340 CALL SGEMV( 'N', 0, 0, ALPHA, A, 1, X, 1, BETA, Y, 0 )
2344 CALL SGBMV( '/', 0, 0, 0, 0, ALPHA, A, 1, X, 1, BETA, Y, 1 )
2347 CALL SGBMV( 'N', -1, 0, 0, 0, ALPHA, A, 1, X, 1, BETA, Y, 1 )
2350 CALL SGBMV( 'N', 0, -1, 0, 0, ALPHA, A, 1, X, 1, BETA, Y, 1 )
2353 CALL SGBMV( 'N', 0, 0, -1, 0, ALPHA, A, 1, X, 1, BETA, Y, 1 )
2356 CALL SGBMV( 'N', 2, 0, 0, -1, ALPHA, A, 1, X, 1, BETA, Y, 1 )
2359 CALL SGBMV( 'N', 0, 0, 1, 0, ALPHA, A, 1, X, 1, BETA, Y, 1 )
2362 CALL SGBMV( 'N', 0, 0, 0, 0, ALPHA, A, 1, X, 0, BETA, Y, 1 )
2365 CALL SGBMV( 'N', 0, 0, 0, 0, ALPHA, A, 1, X, 1, BETA, Y, 0 )
2369 CALL SSYMV( '/', 0, ALPHA, A, 1, X, 1, BETA, Y, 1 )
2372 CALL SSYMV( 'U', -1, ALPHA, A, 1, X, 1, BETA, Y, 1 )
2375 CALL SSYMV( 'U', 2, ALPHA, A, 1, X, 1, BETA, Y, 1 )
2378 CALL SSYMV( 'U', 0, ALPHA, A, 1, X, 0, BETA, Y, 1 )
2381 CALL SSYMV( 'U', 0, ALPHA, A, 1, X, 1, BETA, Y, 0 )
2385 CALL SSBMV( '/', 0, 0, ALPHA, A, 1, X, 1, BETA, Y, 1 )
2388 CALL SSBMV( 'U', -1, 0, ALPHA, A, 1, X, 1, BETA, Y, 1 )
2391 CALL SSBMV( 'U', 0, -1, ALPHA, A, 1, X, 1, BETA, Y, 1 )
2394 CALL SSBMV( 'U', 0, 1, ALPHA, A, 1, X, 1, BETA, Y, 1 )
2397 CALL SSBMV( 'U', 0, 0, ALPHA, A, 1, X, 0, BETA, Y, 1 )
2400 CALL SSBMV( 'U', 0, 0, ALPHA, A, 1, X, 1, BETA, Y, 0 )
2404 CALL SSPMV( '/', 0, ALPHA, A, X, 1, BETA, Y, 1 )
2407 CALL SSPMV( 'U', -1, ALPHA, A, X, 1, BETA, Y, 1 )
2410 CALL SSPMV( 'U', 0, ALPHA, A, X, 0, BETA, Y, 1 )
2413 CALL SSPMV( 'U', 0, ALPHA, A, X, 1, BETA, Y, 0 )
2531 CALL SGER( -1, 0, ALPHA, X, 1, Y, 1, A, 1 )
2534 CALL SGER( 0, -1, ALPHA, X, 1, Y, 1, A, 1 )
2537 CALL SGER( 0, 0, ALPHA, X, 0, Y, 1, A, 1 )
2540 CALL SGER( 0, 0, ALPHA, X, 1, Y, 0, A, 1 )
2543 CALL SGER( 2, 0, ALPHA, X, 1, Y, 1, A, 1 )
2547 CALL SSYR( '/', 0, ALPHA, X, 1, A, 1 )
2550 CALL SSYR( 'U', -1, ALPHA, X, 1, A, 1 )
2553 CALL SSYR( 'U', 0, ALPHA, X, 0, A, 1 )
2556 CALL SSYR( 'U', 2, ALPHA, X, 1, A, 1 )
2560 CALL SSPR( '/', 0, ALPHA, X, 1, A )
2563 CALL SSPR( 'U', -1, ALPHA, X, 1, A )
2566 CALL SSPR( 'U', 0, ALPHA, X, 0, A )
2570 CALL SSYR2( '/', 0, ALPHA, X, 1, Y, 1, A, 1 )
2573 CALL SSYR2( 'U', -1, ALPHA, X, 1, Y, 1, A, 1 )
2576 CALL SSYR2( 'U', 0, ALPHA, X, 0, Y, 1, A, 1 )
2579 CALL SSYR2( 'U', 0, ALPHA, X, 1, Y, 0, A, 1 )
2582 CALL SSYR2( 'U', 2, ALPHA, X, 1, Y, 1, A, 1 )
2586 CALL SSPR2( '/', 0, ALPHA, X, 1, Y, 1, A )
2589 CALL SSPR2( 'U', -1, ALPHA, X, 1, Y, 1, A )
2592 CALL SSPR2( 'U', 0, ALPHA, X, 0, Y, 1, A )
2595 CALL SSPR2( 'U', 0, ALPHA, X, 1, Y, 0, A )
2788 SUBROUTINE SMVCH( TRANS, M, N, ALPHA, A, NMAX, X, INCX, BETA, Y,
2803 REAL ALPHA, BETA, EPS, ERR
2861 YT( IY ) = ALPHA*YT( IY ) + BETA*Y( IY )
2862 G( IY ) = ABS( ALPHA )*G( IY ) + ABS( BETA*Y( IY ) )
