Searched defs:BETA (Results 1 - 25 of 47) sorted by relevance

12

/external/cblas/examples/
H A Dcblas_example2.c16 ALPHA=0.0, BETA=0.0; local
27 ALPHA, A, 1, B, 1, BETA, C, 1 );
32 ALPHA, A, 1, B, 1, BETA, C, 1 );
37 ALPHA, A, 1, B, 1, BETA, C, 2 );
42 ALPHA, A, 1, B, 1, BETA, C, 1 );
49 &ALPHA, A, &lda, B, &ldb, &BETA, C, &ldc );
55 &ALPHA, A, &lda, B, &ldb, &BETA, C, &ldc );
61 &ALPHA, A, &lda, B, &ldb, &BETA, C, &ldc );
67 &ALPHA, A, &lda, B, &ldb, &BETA, C, &ldc );
/external/cblas/testing/
H A Dc_c2chke.c33 BETA[2] = {0.0,0.0}, local
52 ALPHA, A, 1, X, 1, BETA, Y, 1 );
56 ALPHA, A, 1, X, 1, BETA, Y, 1 );
60 ALPHA, A, 1, X, 1, BETA, Y, 1 );
64 ALPHA, A, 1, X, 1, BETA, Y, 1 );
68 ALPHA, A, 1, X, 1, BETA, Y, 1 );
72 ALPHA, A, 1, X, 0, BETA, Y, 1 );
76 ALPHA, A, 1, X, 1, BETA, Y, 0 );
81 ALPHA, A, 1, X, 1, BETA, Y, 1 );
85 ALPHA, A, 1, X, 1, BETA,
[all...]
H A Dc_c3chke.c33 BETA[2] = {0.0,0.0}, local
53 ALPHA, A, 1, B, 1, BETA, C, 1 );
57 ALPHA, A, 1, B, 1, BETA, C, 1 );
61 ALPHA, A, 1, B, 1, BETA, C, 1 );
65 ALPHA, A, 1, B, 1, BETA, C, 1 );
69 ALPHA, A, 1, B, 1, BETA, C, 1 );
73 ALPHA, A, 1, B, 1, BETA, C, 1 );
77 ALPHA, A, 1, B, 1, BETA, C, 1 );
81 ALPHA, A, 1, B, 1, BETA, C, 1 );
85 ALPHA, A, 1, B, 1, BETA,
[all...]
H A Dc_d2chke.c32 ALPHA=0.0, BETA=0.0; local
50 ALPHA, A, 1, X, 1, BETA, Y, 1 );
54 ALPHA, A, 1, X, 1, BETA, Y, 1 );
58 ALPHA, A, 1, X, 1, BETA, Y, 1 );
62 ALPHA, A, 1, X, 1, BETA, Y, 1 );
66 ALPHA, A, 1, X, 1, BETA, Y, 1 );
70 ALPHA, A, 1, X, 0, BETA, Y, 1 );
74 ALPHA, A, 1, X, 1, BETA, Y, 0 );
79 ALPHA, A, 1, X, 1, BETA, Y, 1 );
83 ALPHA, A, 1, X, 1, BETA,
[all...]
H A Dc_d3chke.c32 ALPHA=0.0, BETA=0.0; local
51 ALPHA, A, 1, B, 1, BETA, C, 1 );
55 ALPHA, A, 1, B, 1, BETA, C, 1 );
59 ALPHA, A, 1, B, 1, BETA, C, 1 );
63 ALPHA, A, 1, B, 1, BETA, C, 1 );
67 ALPHA, A, 1, B, 1, BETA, C, 1 );
71 ALPHA, A, 1, B, 1, BETA, C, 1 );
75 ALPHA, A, 1, B, 1, BETA, C, 1 );
79 ALPHA, A, 1, B, 1, BETA, C, 1 );
83 ALPHA, A, 1, B, 1, BETA,
[all...]
H A Dc_s2chke.c32 ALPHA=0.0, BETA=0.0; local
50 ALPHA, A, 1, X, 1, BETA, Y, 1 );
54 ALPHA, A, 1, X, 1, BETA, Y, 1 );
58 ALPHA, A, 1, X, 1, BETA, Y, 1 );
62 ALPHA, A, 1, X, 1, BETA, Y, 1 );
66 ALPHA, A, 1, X, 1, BETA, Y, 1 );
70 ALPHA, A, 1, X, 0, BETA, Y, 1 );
74 ALPHA, A, 1, X, 1, BETA, Y, 0 );
79 ALPHA, A, 1, X, 1, BETA, Y, 1 );
83 ALPHA, A, 1, X, 1, BETA,
[all...]
H A Dc_s3chke.c32 ALPHA=0.0, BETA=0.0; local
50 ALPHA, A, 1, B, 1, BETA, C, 1 );
54 ALPHA, A, 1, B, 1, BETA, C, 1 );
58 ALPHA, A, 1, B, 1, BETA, C, 1 );
62 ALPHA, A, 1, B, 1, BETA, C, 1 );
66 ALPHA, A, 1, B, 1, BETA, C, 1 );
70 ALPHA, A, 1, B, 1, BETA, C, 1 );
74 ALPHA, A, 1, B, 1, BETA, C, 1 );
78 ALPHA, A, 1, B, 1, BETA, C, 1 );
82 ALPHA, A, 1, B, 1, BETA,
[all...]
H A Dc_z2chke.c33 BETA[2] = {0.0,0.0}, local
52 ALPHA, A, 1, X, 1, BETA, Y, 1 );
56 ALPHA, A, 1, X, 1, BETA, Y, 1 );
60 ALPHA, A, 1, X, 1, BETA, Y, 1 );
64 ALPHA, A, 1, X, 1, BETA, Y, 1 );
68 ALPHA, A, 1, X, 1, BETA, Y, 1 );
72 ALPHA, A, 1, X, 0, BETA, Y, 1 );
76 ALPHA, A, 1, X, 1, BETA, Y, 0 );
81 ALPHA, A, 1, X, 1, BETA, Y, 1 );
85 ALPHA, A, 1, X, 1, BETA,
[all...]
H A Dc_z3chke.c33 BETA[2] = {0.0,0.0}, local
53 ALPHA, A, 1, B, 1, BETA, C, 1 );
57 ALPHA, A, 1, B, 1, BETA, C, 1 );
61 ALPHA, A, 1, B, 1, BETA, C, 1 );
65 ALPHA, A, 1, B, 1, BETA, C, 1 );
69 ALPHA, A, 1, B, 1, BETA, C, 1 );
73 ALPHA, A, 1, B, 1, BETA, C, 1 );
77 ALPHA, A, 1, B, 1, BETA, C, 1 );
81 ALPHA, A, 1, B, 1, BETA, C, 1 );
85 ALPHA, A, 1, B, 1, BETA,
[all...]
/external/eigen/lapack/
H A Ddlarfg.f130 DOUBLE PRECISION BETA, RSAFMN, SAFMIN, XNORM local in subroutine:DLARFG
160 BETA = -SIGN( DLAPY2( ALPHA, XNORM ), ALPHA )
163 IF( ABS( BETA ).LT.SAFMIN ) THEN
165 * XNORM, BETA may be inaccurate; scale X and recompute them
171 BETA = BETA*RSAFMN
173 IF( ABS( BETA ).LT.SAFMIN )
176 * New BETA is at most 1, at least SAFMIN
179 BETA = -SIGN( DLAPY2( ALPHA, XNORM ), ALPHA )
181 TAU = ( BETA
[all...]
H A Dslarfg.f130 REAL BETA, RSAFMN, SAFMIN, XNORM local in subroutine:SLARFG
160 BETA = -SIGN( SLAPY2( ALPHA, XNORM ), ALPHA )
163 IF( ABS( BETA ).LT.SAFMIN ) THEN
165 * XNORM, BETA may be inaccurate; scale X and recompute them
171 BETA = BETA*RSAFMN
173 IF( ABS( BETA ).LT.SAFMIN )
176 * New BETA is at most 1, at least SAFMIN
179 BETA = -SIGN( SLAPY2( ALPHA, XNORM ), ALPHA )
181 TAU = ( BETA
[all...]
H A Dclarfg.f130 REAL ALPHI, ALPHR, BETA, RSAFMN, SAFMIN, XNORM local in subroutine:CLARFG
163 BETA = -SIGN( SLAPY3( ALPHR, ALPHI, XNORM ), ALPHR )
168 IF( ABS( BETA ).LT.SAFMIN ) THEN
170 * XNORM, BETA may be inaccurate; scale X and recompute them
175 BETA = BETA*RSAFMN
178 IF( ABS( BETA ).LT.SAFMIN )
181 * New BETA is at most 1, at least SAFMIN
185 BETA = -SIGN( SLAPY3( ALPHR, ALPHI, XNORM ), ALPHR )
187 TAU = CMPLX( ( BETA
[all...]
H A Dzlarfg.f130 DOUBLE PRECISION ALPHI, ALPHR, BETA, RSAFMN, SAFMIN, XNORM local in subroutine:ZLARFG
163 BETA = -SIGN( DLAPY3( ALPHR, ALPHI, XNORM ), ALPHR )
168 IF( ABS( BETA ).LT.SAFMIN ) THEN
170 * XNORM, BETA may be inaccurate; scale X and recompute them
175 BETA = BETA*RSAFMN
178 IF( ABS( BETA ).LT.SAFMIN )
181 * New BETA is at most 1, at least SAFMIN
185 BETA = -SIGN( DLAPY3( ALPHR, ALPHI, XNORM ), ALPHR )
187 TAU = DCMPLX( ( BETA
[all...]
/external/cblas/src/
H A Dcblas_cgbmv.c39 float ALPHA[2],BETA[2]; local
74 BETA[0]= *bet;
75 BETA[1]= -bet[1];
144 A ,&F77_lda, x,&F77_incX, BETA, Y, &F77_incY);
H A Dcblas_cgemv.c36 float ALPHA[2],BETA[2]; local
74 BETA[0]= *( (const float *) beta );
75 BETA[1]= -( *( (const float *) beta+1 ) );
139 &F77_incX, BETA, Y, &F77_incY);
H A Dcblas_chbmv.c35 float ALPHA[2],BETA[2]; local
65 BETA[0]= *bet;
66 BETA[1]= -bet[1];
132 A ,&F77_lda, x,&F77_incX, BETA, Y, &F77_incY);
H A Dcblas_chemv.c34 float ALPHA[2],BETA[2]; local
65 BETA[0]= *bet;
66 BETA[1]= -bet[1];
133 BETA, Y, &F77_incY);
H A Dcblas_chpmv.c33 float ALPHA[2],BETA[2]; local
63 BETA[0]= *bet;
64 BETA[1]= -bet[1];
132 AP, x, &F77_incX, BETA, Y, &F77_incY);
H A Dcblas_zgbmv.c39 double ALPHA[2],BETA[2]; local
74 BETA[0]= *bet;
75 BETA[1]= -bet[1];
144 A ,&F77_lda, x,&F77_incX, BETA, Y, &F77_incY);
H A Dcblas_zgemv.c36 double ALPHA[2],BETA[2]; local
73 BETA[0]= *bet;
74 BETA[1]= -bet[1];
141 &F77_incX, BETA, Y, &F77_incY);
H A Dcblas_zhbmv.c35 double ALPHA[2],BETA[2]; local
65 BETA[0]= *bet;
66 BETA[1]= -bet[1];
132 A ,&F77_lda, x,&F77_incX, BETA, Y, &F77_incY);
H A Dcblas_zhemv.c34 double ALPHA[2],BETA[2]; local
65 BETA[0]= *bet;
66 BETA[1]= -bet[1];
133 BETA, Y, &F77_incY);
H A Dcblas_zhpmv.c33 double ALPHA[2],BETA[2]; local
63 BETA[0]= *bet;
64 BETA[1]= -bet[1];
132 AP, x, &F77_incX, BETA, Y, &F77_incY);
/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
109 * BETA - COMPLEX .
110 * On entry, BETA specifies the scalar beta.
180 IF ((N.EQ.0) .OR. ((ALPHA.EQ.ZERO).AND. (BETA.EQ.ONE))) RETURN
200 IF (BETA.NE.ONE) THEN
202 IF (BETA.EQ.ZERO) THEN
208 Y(I) = BETA*Y(I)
213 IF (BETA.EQ.ZERO) THEN
220 Y(IY) = BETA*
[all...]
H A Dchpmv.f1 SUBROUTINE CHPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY)
3 COMPLEX ALPHA,BETA local in subroutine:CHPMV
73 * BETA - COMPLEX .
74 * On entry, BETA specifies the scalar beta. When BETA is
142 IF ((N.EQ.0) .OR. ((ALPHA.EQ.ZERO).AND. (BETA.EQ.ONE))) RETURN
162 IF (BETA.NE.ONE) THEN
164 IF (BETA.EQ.ZERO) THEN
170 Y(I) = BETA*Y(I)
175 IF (BETA
[all...]

Completed in 265 milliseconds

12