Searched defs:ALPHA (Results 26 - 50 of 59) sorted by relevance

123

/external/cblas/src/
H A Dcblas_zhemv.c34 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 Dcblas_zhpmv.c33 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 Dchbmv.f1 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 Dchpmv.f1 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 Ddsbmv.f1 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 Ddspmv.f1 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 Dssbmv.f1 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 Dsspmv.f1 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 Dzhbmv.f1 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 Dzhpmv.f1 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 DLexerCore.java49 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 DTokenTypes.java170 public static final int ALPHA = LexerCore.ALPHA; field in interface:TokenTypes
/external/cblas/testing/
H A Dc_cblat2.f23 * 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 Dc_cblat3.f19 * 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 Dc_dblat2.f23 * 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 Dc_dblat3.f19 * 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 Dc_sblat2.f23 * 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 Dc_sblat3.f19 * 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 Dc_zblat2.f23 * 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 Dc_zblat3.f19 * 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 Dcblat2.f24 * 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 Dcblat3.f20 * 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 Ddblat2.f24 * 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 Ddblat3.f20 * 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 Dsblat2.f24 * 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...]

Completed in 2424 milliseconds

123