/external/cblas/src/ |
H A D | cblas_zhemv.c | 34 double ALPHA[2],BETA[2]; local 63 ALPHA[0]= *alp; 64 ALPHA[1]= -alp[1]; 132 F77_zhemv(F77_UL, &F77_N, ALPHA, A, &F77_lda, x, &F77_incX,
|
H A D | cblas_zhpmv.c | 33 double ALPHA[2],BETA[2]; local 61 ALPHA[0]= *alp; 62 ALPHA[1]= -alp[1]; 131 F77_zhpmv(F77_UL, &F77_N, ALPHA,
|
/external/eigen/blas/fortran/ |
H A D | chbmv.f | 1 SUBROUTINE CHBMV(UPLO,N,K,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) 3 COMPLEX ALPHA,BETA local in subroutine:CHBMV 47 * ALPHA - COMPLEX . 48 * On entry, ALPHA specifies the scalar alpha. 180 IF ((N.EQ.0) .OR. ((ALPHA.EQ.ZERO).AND. (BETA.EQ.ONE))) RETURN 226 IF (ALPHA.EQ.ZERO) RETURN 234 TEMP1 = ALPHA*X(J) 241 Y(J) = Y(J) + TEMP1*REAL(A(KPLUS1,J)) + ALPHA*TEMP2 247 TEMP1 = ALPHA*X(JX) 258 Y(JY) = Y(JY) + TEMP1*REAL(A(KPLUS1,J)) + ALPHA*TEMP [all...] |
H A D | chpmv.f | 1 SUBROUTINE CHPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY) 3 COMPLEX ALPHA,BETA local in subroutine:CHPMV 42 * ALPHA - COMPLEX . 43 * On entry, ALPHA specifies the scalar alpha. 142 IF ((N.EQ.0) .OR. ((ALPHA.EQ.ZERO).AND. (BETA.EQ.ONE))) RETURN 188 IF (ALPHA.EQ.ZERO) RETURN 196 TEMP1 = ALPHA*X(J) 204 Y(J) = Y(J) + TEMP1*REAL(AP(KK+J-1)) + ALPHA*TEMP2 211 TEMP1 = ALPHA*X(JX) 221 Y(JY) = Y(JY) + TEMP1*REAL(AP(KK+J-1)) + ALPHA*TEMP [all...] |
H A D | dsbmv.f | 1 SUBROUTINE DSBMV(UPLO,N,K,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) 3 DOUBLE PRECISION ALPHA,BETA local in subroutine:DSBMV 47 * ALPHA - DOUBLE PRECISION. 48 * On entry, ALPHA specifies the scalar alpha. 174 IF ((N.EQ.0) .OR. ((ALPHA.EQ.ZERO).AND. (BETA.EQ.ONE))) RETURN 220 IF (ALPHA.EQ.ZERO) RETURN 228 TEMP1 = ALPHA*X(J) 235 Y(J) = Y(J) + TEMP1*A(KPLUS1,J) + ALPHA*TEMP2 241 TEMP1 = ALPHA*X(JX) 252 Y(JY) = Y(JY) + TEMP1*A(KPLUS1,J) + ALPHA*TEMP [all...] |
H A D | dspmv.f | 1 SUBROUTINE DSPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY) 3 DOUBLE PRECISION ALPHA,BETA local in subroutine:DSPMV 42 * ALPHA - DOUBLE PRECISION. 43 * On entry, ALPHA specifies the scalar alpha. 135 IF ((N.EQ.0) .OR. ((ALPHA.EQ.ZERO).AND. (BETA.EQ.ONE))) RETURN 181 IF (ALPHA.EQ.ZERO) RETURN 189 TEMP1 = ALPHA*X(J) 197 Y(J) = Y(J) + TEMP1*AP(KK+J-1) + ALPHA*TEMP2 204 TEMP1 = ALPHA*X(JX) 214 Y(JY) = Y(JY) + TEMP1*AP(KK+J-1) + ALPHA*TEMP [all...] |
H A D | ssbmv.f | 1 SUBROUTINE SSBMV(UPLO,N,K,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) 3 REAL ALPHA,BETA local in subroutine:SSBMV 47 * ALPHA - REAL . 48 * On entry, ALPHA specifies the scalar alpha. 176 IF ((N.EQ.0) .OR. ((ALPHA.EQ.ZERO).AND. (BETA.EQ.ONE))) RETURN 222 IF (ALPHA.EQ.ZERO) RETURN 230 TEMP1 = ALPHA*X(J) 237 Y(J) = Y(J) + TEMP1*A(KPLUS1,J) + ALPHA*TEMP2 243 TEMP1 = ALPHA*X(JX) 254 Y(JY) = Y(JY) + TEMP1*A(KPLUS1,J) + ALPHA*TEMP [all...] |
H A D | sspmv.f | 1 SUBROUTINE SSPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY) 3 REAL ALPHA,BETA local in subroutine:SSPMV 42 * ALPHA - REAL . 43 * On entry, ALPHA specifies the scalar alpha. 135 IF ((N.EQ.0) .OR. ((ALPHA.EQ.ZERO).AND. (BETA.EQ.ONE))) RETURN 181 IF (ALPHA.EQ.ZERO) RETURN 189 TEMP1 = ALPHA*X(J) 197 Y(J) = Y(J) + TEMP1*AP(KK+J-1) + ALPHA*TEMP2 204 TEMP1 = ALPHA*X(JX) 214 Y(JY) = Y(JY) + TEMP1*AP(KK+J-1) + ALPHA*TEMP [all...] |
H A D | zhbmv.f | 1 SUBROUTINE ZHBMV(UPLO,N,K,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) 3 DOUBLE COMPLEX ALPHA,BETA local in subroutine:ZHBMV 47 * ALPHA - COMPLEX*16 . 48 * On entry, ALPHA specifies the scalar alpha. 180 IF ((N.EQ.0) .OR. ((ALPHA.EQ.ZERO).AND. (BETA.EQ.ONE))) RETURN 226 IF (ALPHA.EQ.ZERO) RETURN 234 TEMP1 = ALPHA*X(J) 241 Y(J) = Y(J) + TEMP1*DBLE(A(KPLUS1,J)) + ALPHA*TEMP2 247 TEMP1 = ALPHA*X(JX) 258 Y(JY) = Y(JY) + TEMP1*DBLE(A(KPLUS1,J)) + ALPHA*TEMP [all...] |
H A D | zhpmv.f | 1 SUBROUTINE ZHPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY) 3 DOUBLE COMPLEX ALPHA,BETA local in subroutine:ZHPMV 42 * ALPHA - COMPLEX*16 . 43 * On entry, ALPHA specifies the scalar alpha. 142 IF ((N.EQ.0) .OR. ((ALPHA.EQ.ZERO).AND. (BETA.EQ.ONE))) RETURN 188 IF (ALPHA.EQ.ZERO) RETURN 196 TEMP1 = ALPHA*X(J) 204 Y(J) = Y(J) + TEMP1*DBLE(AP(KK+J-1)) + ALPHA*TEMP2 211 TEMP1 = ALPHA*X(JX) 221 Y(JY) = Y(JY) + TEMP1*DBLE(AP(KK+J-1)) + ALPHA*TEMP [all...] |
/external/nist-sip/java/gov/nist/core/ |
H A D | LexerCore.java | 49 public static final int ALPHA = END + 3; field in class:LexerCore 188 tok.tokenType = ALPHA; 248 } else if (tok == ALPHA) { 250 throw new ParseException(buffer + "\nExpecting ALPHA", ptr);
|
/external/nist-sip/java/gov/nist/javax/sip/parser/ |
H A D | TokenTypes.java | 170 public static final int ALPHA = LexerCore.ALPHA; field in interface:TokenTypes
|
/external/cblas/testing/ |
H A D | c_cblat2.f | 23 * 3 NUMBER OF VALUES OF ALPHA 24 * (0.0,0.0) (1.0,0.0) (0.7,-0.9) VALUES OF ALPHA 188 * Values of ALPHA 191 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX 440 9989 FORMAT( ' FOR ALPHA ', 495 COMPLEX ALPHA, ALS, BETA, BLS, TRANSL local in subroutine:CCHK1 616 ALPHA = ALF( IA ) 638 ALS = ALPHA 658 $ CTRANS, M, N, ALPHA, LDA, INCX, BETA, 663 $ ALPHA, A 850 COMPLEX ALPHA local in subroutine:CCHK2 1588 COMPLEX ALPHA local in subroutine:CCHK4 1865 COMPLEX ALPHA local in subroutine:CCHK5 2158 COMPLEX ALPHA local in subroutine:CCHK6 2468 COMPLEX ALPHA local in subroutine:CMVCH [all...] |
H A D | c_cblat3.f | 19 * 3 NUMBER OF VALUES OF ALPHA 20 * (0.0,0.0) (1.0,0.0) (0.7,-0.9) VALUES OF ALPHA 140 * Values of ALPHA 143 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX 402 9993 FORMAT( ' FOR ALPHA ', 459 COMPLEX ALPHA, ALS, BETA, BLS local in subroutine:CCHK1 559 ALPHA = ALF( IA ) 579 ALS = ALPHA 598 $ TRANSA, TRANSB, M, N, K, ALPHA, LDA, 603 $ K, ALPHA, A 723 COMPLEX ALPHA local in subroutine:CPRCN1 789 COMPLEX ALPHA local in subroutine:CCHK2 1049 COMPLEX ALPHA local in subroutine:CPRCN2 1109 COMPLEX ALPHA local in subroutine:CCHK3 1400 COMPLEX ALPHA local in subroutine:CPRCN3 1474 COMPLEX ALPHA local in subroutine:CCHK4 1786 COMPLEX ALPHA local in subroutine:CPRCN4 1820 REAL ALPHA local in subroutine:CPRCN6 1884 COMPLEX ALPHA local in subroutine:CCHK5 2239 COMPLEX ALPHA local in subroutine:CPRCN5 2273 COMPLEX ALPHA local in subroutine:CPRCN7 2452 COMPLEX ALPHA local in subroutine:CMMCH [all...] |
H A D | c_dblat2.f | 23 * 3 NUMBER OF VALUES OF ALPHA 24 * 0.0 1.0 0.7 VALUES OF ALPHA 184 * Values of ALPHA 187 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX 436 9989 FORMAT( ' FOR ALPHA ', 7F6.1 ) 487 DOUBLE PRECISION ALPHA, ALS, BETA, BLS, ERR, ERRMAX, TRANSL local in subroutine:DCHK1 607 ALPHA = ALF( IA ) 629 ALS = ALPHA 649 $ CTRANS, M, N, ALPHA, LDA, INCX, 654 $ ALPHA, A 847 DOUBLE PRECISION ALPHA local in subroutine:DCHK2 1593 DOUBLE PRECISION ALPHA local in subroutine:DCHK4 1865 DOUBLE PRECISION ALPHA local in subroutine:DCHK5 2161 DOUBLE PRECISION ALPHA local in subroutine:DCHK6 2654 DOUBLE PRECISION ALPHA local in subroutine:DMVCH [all...] |
H A D | c_dblat3.f | 19 * 3 NUMBER OF VALUES OF ALPHA 20 * 0.0 1.0 0.7 VALUES OF ALPHA 135 * Values of ALPHA 138 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX 396 9993 FORMAT( ' FOR ALPHA ', 7F6.1 ) 447 DOUBLE PRECISION ALPHA, ALS, BETA, BLS, ERR, ERRMAX local in subroutine:DCHK1 546 ALPHA = ALF( IA ) 566 ALS = ALPHA 585 $ TRANSA, TRANSB, M, N, K, ALPHA, LDA, 590 $ K, ALPHA, A 709 DOUBLE PRECISION ALPHA local in subroutine:DPRCN1 771 DOUBLE PRECISION ALPHA local in subroutine:DCHK2 1023 DOUBLE PRECISION ALPHA local in subroutine:DPRCN2 1080 DOUBLE PRECISION ALPHA local in subroutine:DCHK3 1369 DOUBLE PRECISION ALPHA local in subroutine:DPRCN3 1439 DOUBLE PRECISION ALPHA local in subroutine:DCHK4 1695 DOUBLE PRECISION ALPHA local in subroutine:DPRCN4 1756 DOUBLE PRECISION ALPHA local in subroutine:DCHK5 2052 DOUBLE PRECISION ALPHA local in subroutine:DPRCN5 2213 DOUBLE PRECISION ALPHA local in subroutine:DMMCH [all...] |
H A D | c_sblat2.f | 23 * 3 NUMBER OF VALUES OF ALPHA 24 * 0.0 1.0 0.7 VALUES OF ALPHA 184 * Values of ALPHA 187 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX 436 9989 FORMAT( ' FOR ALPHA ', 7F6.1 ) 487 REAL ALPHA, ALS, BETA, BLS, ERR, ERRMAX, TRANSL local in subroutine:SCHK1 607 ALPHA = ALF( IA ) 629 ALS = ALPHA 649 $ CTRANS, M, N, ALPHA, LDA, INCX, 654 $ ALPHA, A 847 REAL ALPHA local in subroutine:SCHK2 1593 REAL ALPHA local in subroutine:SCHK4 1865 REAL ALPHA local in subroutine:SCHK5 2161 REAL ALPHA local in subroutine:SCHK6 2654 REAL ALPHA local in subroutine:SMVCH [all...] |
H A D | c_sblat3.f | 19 * 3 NUMBER OF VALUES OF ALPHA 20 * 0.0 1.0 0.7 VALUES OF ALPHA 134 * Values of ALPHA 137 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX 395 9993 FORMAT( ' FOR ALPHA ', 7F6.1 ) 447 REAL ALPHA, ALS, BETA, BLS, ERR, ERRMAX local in subroutine:SCHK1 546 ALPHA = ALF( IA ) 566 ALS = ALPHA 585 $ TRANSA, TRANSB, M, N, K, ALPHA, LDA, 590 $ K, ALPHA, A 712 REAL ALPHA local in subroutine:SPRCN1 775 REAL ALPHA local in subroutine:SCHK2 1027 REAL ALPHA local in subroutine:SPRCN2 1084 REAL ALPHA local in subroutine:SCHK3 1373 REAL ALPHA local in subroutine:SPRCN3 1444 REAL ALPHA local in subroutine:SCHK4 1700 REAL ALPHA local in subroutine:SPRCN4 1761 REAL ALPHA local in subroutine:SCHK5 2056 REAL ALPHA local in subroutine:SPRCN5 2217 REAL ALPHA local in subroutine:SMMCH [all...] |
H A D | c_zblat2.f | 23 * 3 NUMBER OF VALUES OF ALPHA 24 * (0.0,0.0) (1.0,0.0) (0.7,-0.9) VALUES OF ALPHA 189 * Values of ALPHA 192 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX 440 9989 FORMAT( ' FOR ALPHA ', 496 COMPLEX*16 ALPHA, ALS, BETA, BLS, TRANSL local in subroutine:ZCHK1 617 ALPHA = ALF( IA ) 639 ALS = ALPHA 659 $ CTRANS, M, N, ALPHA, LDA, INCX, BETA, 664 $ ALPHA, A 852 COMPLEX*16 ALPHA local in subroutine:ZCHK2 1592 COMPLEX*16 ALPHA local in subroutine:ZCHK4 1870 COMPLEX*16 ALPHA local in subroutine:ZCHK5 2164 COMPLEX*16 ALPHA local in subroutine:ZCHK6 2474 COMPLEX*16 ALPHA local in subroutine:ZMVCH [all...] |
H A D | c_zblat3.f | 19 * 3 NUMBER OF VALUES OF ALPHA 20 * (0.0,0.0) (1.0,0.0) (0.7,-0.9) VALUES OF ALPHA 141 * Values of ALPHA 144 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX 403 9993 FORMAT( ' FOR ALPHA ', 460 COMPLEX*16 ALPHA, ALS, BETA, BLS local in subroutine:ZCHK1 560 ALPHA = ALF( IA ) 580 ALS = ALPHA 599 $ TRANSA, TRANSB, M, N, K, ALPHA, LDA, 604 $ K, ALPHA, A 724 DOUBLE COMPLEX ALPHA local in subroutine:ZPRCN1 790 COMPLEX*16 ALPHA local in subroutine:ZCHK2 1050 DOUBLE COMPLEX ALPHA local in subroutine:ZPRCN2 1110 COMPLEX*16 ALPHA local in subroutine:ZCHK3 1401 DOUBLE COMPLEX ALPHA local in subroutine:ZPRCN3 1475 COMPLEX*16 ALPHA local in subroutine:ZCHK4 1787 DOUBLE COMPLEX ALPHA local in subroutine:ZPRCN4 1821 DOUBLE PRECISION ALPHA local in subroutine:ZPRCN6 1885 COMPLEX*16 ALPHA local in subroutine:ZCHK5 2240 DOUBLE COMPLEX ALPHA local in subroutine:ZPRCN5 2274 DOUBLE COMPLEX ALPHA local in subroutine:ZPRCN7 2454 COMPLEX*16 ALPHA local in subroutine:ZMMCH [all...] |
/external/eigen/blas/testing/ |
H A D | cblat2.f | 24 * 3 NUMBER OF VALUES OF ALPHA 25 * (0.0,0.0) (1.0,0.0) (0.7,-0.9) VALUES OF ALPHA 191 * Values of ALPHA 194 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX 376 9989 FORMAT( ' FOR ALPHA ', 431 COMPLEX ALPHA, ALS, BETA, BLS, TRANSL local in subroutine:CCHK1 544 ALPHA = ALF( IA ) 566 ALS = ALPHA 586 $ TRANS, M, N, ALPHA, LDA, INCX, BETA, 590 CALL CGEMV( TRANS, M, N, ALPHA, A 776 COMPLEX ALPHA local in subroutine:CCHK2 1485 COMPLEX ALPHA local in subroutine:CCHK4 1762 COMPLEX ALPHA local in subroutine:CCHK5 2046 COMPLEX ALPHA local in subroutine:CCHK6 2354 COMPLEX ALPHA local in subroutine:CCHKE 2887 COMPLEX ALPHA local in subroutine:CMVCH [all...] |
H A D | cblat3.f | 20 * 3 NUMBER OF VALUES OF ALPHA 21 * (0.0,0.0) (1.0,0.0) (0.7,-0.9) VALUES OF ALPHA 142 * Values of ALPHA 145 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX 343 9993 FORMAT( ' FOR ALPHA ', 399 COMPLEX ALPHA, ALS, BETA, BLS local in subroutine:CCHK1 499 ALPHA = ALF( IA ) 519 ALS = ALPHA 538 $ TRANSA, TRANSB, M, N, K, ALPHA, LDA, LDB, 542 CALL CGEMM( TRANSA, TRANSB, M, N, K, ALPHA, 684 COMPLEX ALPHA local in subroutine:CCHK2 962 COMPLEX ALPHA local in subroutine:CCHK3 1273 COMPLEX ALPHA local in subroutine:CCHK4 1605 COMPLEX ALPHA local in subroutine:CCHK5 1966 COMPLEX ALPHA local in subroutine:CCHKE 3019 COMPLEX ALPHA local in subroutine:CMMCH [all...] |
H A D | dblat2.f | 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 DOUBLE PRECISION ALPHA, ALS, BETA, BLS, ERR, ERRMAX, TRANSL local in subroutine:DCHK1 534 ALPHA = ALF( IA ) 556 ALS = ALPHA 576 $ TRANS, M, N, ALPHA, LDA, INCX, BETA, 580 CALL DGEMV( TRANS, M, N, ALPHA, A 763 DOUBLE PRECISION ALPHA local in subroutine:DCHK2 1461 DOUBLE PRECISION ALPHA local in subroutine:DCHK4 1722 DOUBLE PRECISION ALPHA local in subroutine:DCHK5 2000 DOUBLE PRECISION ALPHA local in subroutine:DCHK6 2305 DOUBLE PRECISION ALPHA local in subroutine:DCHKE 2803 DOUBLE PRECISION ALPHA local in subroutine:DMVCH [all...] |
H A D | dblat3.f | 20 * 3 NUMBER OF VALUES OF ALPHA 21 * 0.0 1.0 0.7 VALUES OF ALPHA 135 * Values of ALPHA 138 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX 335 9993 FORMAT( ' FOR ALPHA ', 7F6.1 ) 386 DOUBLE PRECISION ALPHA, ALS, BETA, BLS, ERR, ERRMAX local in subroutine:DCHK1 485 ALPHA = ALF( IA ) 505 ALS = ALPHA 524 $ TRANSA, TRANSB, M, N, K, ALPHA, LDA, LDB, 528 CALL DGEMM( TRANSA, TRANSB, M, N, K, ALPHA, 667 DOUBLE PRECISION ALPHA local in subroutine:DCHK2 936 DOUBLE PRECISION ALPHA local in subroutine:DCHK3 1242 DOUBLE PRECISION ALPHA local in subroutine:DCHK4 1517 DOUBLE PRECISION ALPHA local in subroutine:DCHK5 1822 DOUBLE PRECISION ALPHA local in subroutine:DCHKE 2475 DOUBLE PRECISION ALPHA local in subroutine:DMMCH [all...] |
H A D | sblat2.f | 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 local in subroutine:SCHK1 534 ALPHA = ALF( IA ) 556 ALS = ALPHA 576 $ TRANS, M, N, ALPHA, LDA, INCX, BETA, 580 CALL SGEMV( TRANS, M, N, ALPHA, A 763 REAL ALPHA local in subroutine:SCHK2 1461 REAL ALPHA local in subroutine:SCHK4 1722 REAL ALPHA local in subroutine:SCHK5 2000 REAL ALPHA local in subroutine:SCHK6 2305 REAL ALPHA local in subroutine:SCHKE 2803 REAL ALPHA local in subroutine:SMVCH [all...] |