Home
last modified time | relevance | path

Searched refs:UPLO (Results 1 – 25 of 43) sorted by relevance

12

/external/eigen/blas/
Dlevel2_real_impl.h23 if(UPLO(*uplo)==INVALID) info = 1; in EIGEN_BLAS_FUNC()
44 …if(UPLO(*uplo)==UP) vector(actual_y,*n).noalias() += matrix(a,*n,*n,*lda).selfadjointView<Upper>()… in EIGEN_BLAS_FUNC()
45 …else if(UPLO(*uplo)==LO) vector(actual_y,*n).noalias() += matrix(a,*n,*n,*lda).selfadjointView<Low… in EIGEN_BLAS_FUNC()
77 if(UPLO(*uplo)==INVALID) info = 1; in EIGEN_BLAS_FUNC()
95 if(UPLO(*uplo)==LO) in EIGEN_BLAS_FUNC()
131 if(UPLO(*uplo)==INVALID) info = 1; in EIGEN_BLAS_FUNC()
146 …if(UPLO(*uplo)==LO) matrix(c,*n,*n,*ldc).selfadjointView<Lower>().rankUpdate(vector(x_cpy,*n… in EIGEN_BLAS_FUNC()
147 …else if(UPLO(*uplo)==UP) matrix(c,*n,*n,*ldc).selfadjointView<Upper>().rankUpdate(vector(x_cpy,*n… in EIGEN_BLAS_FUNC()
Ddspr.f1 SUBROUTINE DSPR(UPLO,N,ALPHA,X,INCX,AP) argument
5 CHARACTER UPLO local
106 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
134 IF (LSAME(UPLO,'U')) THEN
Dsspr.f1 SUBROUTINE SSPR(UPLO,N,ALPHA,X,INCX,AP) argument
5 CHARACTER UPLO local
106 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
134 IF (LSAME(UPLO,'U')) THEN
Dchpr.f1 SUBROUTINE CHPR(UPLO,N,ALPHA,X,INCX,AP) argument
5 CHARACTER UPLO local
112 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
140 IF (LSAME(UPLO,'U')) THEN
Dlevel3_impl.h120 else if(UPLO(*uplo)==INVALID) info = 2; in EIGEN_BLAS_FUNC()
130 int code = OP(*opa) | (SIDE(*side) << 2) | (UPLO(*uplo) << 3) | (DIAG(*diag) << 4); in EIGEN_BLAS_FUNC()
204 else if(UPLO(*uplo)==INVALID) info = 2; in EIGEN_BLAS_FUNC()
214 int code = OP(*opa) | (SIDE(*side) << 2) | (UPLO(*uplo) << 3) | (DIAG(*diag) << 4); in EIGEN_BLAS_FUNC()
249 else if(UPLO(*uplo)==INVALID) info = 2; in EIGEN_BLAS_FUNC()
273 if(UPLO(*uplo)==UP) in EIGEN_BLAS_FUNC()
278 else if(UPLO(*uplo)==LO) in EIGEN_BLAS_FUNC()
289 …if(UPLO(*uplo)==UP) internal::product_selfadjoint_matrix<Scalar, DenseIndex, RowMajor,true,f… in EIGEN_BLAS_FUNC()
290 …else if(UPLO(*uplo)==LO) internal::product_selfadjoint_matrix<Scalar, DenseIndex, ColMajor,true,f… in EIGEN_BLAS_FUNC()
293 …if(UPLO(*uplo)==UP) internal::product_selfadjoint_matrix<Scalar, DenseIndex, ColMajor,false,… in EIGEN_BLAS_FUNC()
[all …]
Dzhpr.f1 SUBROUTINE ZHPR(UPLO,N,ALPHA,X,INCX,AP) argument
5 CHARACTER UPLO local
112 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
140 IF (LSAME(UPLO,'U')) THEN
Ddspr2.f1 SUBROUTINE DSPR2(UPLO,N,ALPHA,X,INCX,Y,INCY,AP) argument
5 CHARACTER UPLO local
117 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
157 IF (LSAME(UPLO,'U')) THEN
Dsspr2.f1 SUBROUTINE SSPR2(UPLO,N,ALPHA,X,INCX,Y,INCY,AP) argument
5 CHARACTER UPLO local
117 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
157 IF (LSAME(UPLO,'U')) THEN
Dstpmv.f1 SUBROUTINE STPMV(UPLO,TRANS,DIAG,N,AP,X,INCX) argument
4 CHARACTER DIAG,TRANS,UPLO local
121 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
160 IF (LSAME(UPLO,'U')) THEN
228 IF (LSAME(UPLO,'U')) THEN
Ddtpsv.f1 SUBROUTINE DTPSV(UPLO,TRANS,DIAG,N,AP,X,INCX) argument
4 CHARACTER DIAG,TRANS,UPLO local
124 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
163 IF (LSAME(UPLO,'U')) THEN
230 IF (LSAME(UPLO,'U')) THEN
Dstpsv.f1 SUBROUTINE STPSV(UPLO,TRANS,DIAG,N,AP,X,INCX) argument
4 CHARACTER DIAG,TRANS,UPLO local
124 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
163 IF (LSAME(UPLO,'U')) THEN
230 IF (LSAME(UPLO,'U')) THEN
Ddtpmv.f1 SUBROUTINE DTPMV(UPLO,TRANS,DIAG,N,AP,X,INCX) argument
4 CHARACTER DIAG,TRANS,UPLO local
121 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
160 IF (LSAME(UPLO,'U')) THEN
228 IF (LSAME(UPLO,'U')) THEN
Dlevel2_cplx_impl.h29 if(UPLO(*uplo)==INVALID) info = 1; in EIGEN_BLAS_FUNC()
52 …if(UPLO(*uplo)==UP) vector(actual_y,*n).noalias() += matrix(a,*n,*n,*lda).selfadjointView<Upper>()… in EIGEN_BLAS_FUNC()
53 …else if(UPLO(*uplo)==LO) vector(actual_y,*n).noalias() += matrix(a,*n,*n,*lda).selfadjointView<Low… in EIGEN_BLAS_FUNC()
125 if(UPLO(*uplo)==INVALID) info = 1; in EIGEN_BLAS_FUNC()
141 if(UPLO(*uplo)==LO) in EIGEN_BLAS_FUNC()
170 if(UPLO(*uplo)==INVALID) info = 1; in EIGEN_BLAS_FUNC()
185 …if(UPLO(*uplo)==LO) matrix(a,*n,*n,*lda).selfadjointView<Lower>().rankUpdate(vector(x_cpy,*n… in EIGEN_BLAS_FUNC()
186 …else if(UPLO(*uplo)==UP) matrix(a,*n,*n,*lda).selfadjointView<Upper>().rankUpdate(vector(x_cpy,*n… in EIGEN_BLAS_FUNC()
Ddtbmv.f1 SUBROUTINE DTBMV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX) argument
4 CHARACTER DIAG,TRANS,UPLO local
164 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
207 IF (LSAME(UPLO,'U')) THEN
272 IF (LSAME(UPLO,'U')) THEN
Dstbmv.f1 SUBROUTINE STBMV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX) argument
4 CHARACTER DIAG,TRANS,UPLO local
164 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
207 IF (LSAME(UPLO,'U')) THEN
272 IF (LSAME(UPLO,'U')) THEN
Dchpr2.f1 SUBROUTINE CHPR2(UPLO,N,ALPHA,X,INCX,Y,INCY,AP) argument
5 CHARACTER UPLO local
123 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
163 IF (LSAME(UPLO,'U')) THEN
Dzhpr2.f1 SUBROUTINE ZHPR2(UPLO,N,ALPHA,X,INCX,Y,INCY,AP) argument
5 CHARACTER UPLO local
123 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
163 IF (LSAME(UPLO,'U')) THEN
Dchpmv.f1 SUBROUTINE CHPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY) argument
5 CHARACTER UPLO local
126 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
190 IF (LSAME(UPLO,'U')) THEN
Ddspmv.f1 SUBROUTINE DSPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY) argument
5 CHARACTER UPLO local
119 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
183 IF (LSAME(UPLO,'U')) THEN
Dsspmv.f1 SUBROUTINE SSPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY) argument
5 CHARACTER UPLO local
119 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
183 IF (LSAME(UPLO,'U')) THEN
/external/eigen/blas/testing/
Dsblat2.f768 CHARACTER*1 UPLO, UPLOS local
836 UPLO = ICH( IC: IC )
841 CALL SMAKE( SNAME( 2: 3 ), UPLO, ' ', N, N, A, NMAX, AA,
880 UPLOS = UPLO
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,
[all …]
Ddblat2.f768 CHARACTER*1 UPLO, UPLOS local
836 UPLO = ICH( IC: IC )
841 CALL DMAKE( SNAME( 2: 3 ), UPLO, ' ', N, N, A, NMAX, AA,
880 UPLOS = UPLO
903 $ UPLO, N, ALPHA, LDA, INCX, BETA, INCY
906 CALL DSYMV( UPLO, N, ALPHA, AA, LDA, XX,
911 $ UPLO, N, K, ALPHA, LDA, INCX, BETA,
915 CALL DSBMV( UPLO, N, K, ALPHA, AA, LDA,
920 $ UPLO, N, ALPHA, INCX, BETA, INCY
923 CALL DSPMV( UPLO, N, ALPHA, AA, XX, INCX,
[all …]
Dzblat2.f785 CHARACTER*1 UPLO, UPLOS local
853 UPLO = ICH( IC: IC )
858 CALL ZMAKE( SNAME( 2: 3 ), UPLO, ' ', N, N, A, NMAX, AA,
897 UPLOS = UPLO
920 $ UPLO, N, ALPHA, LDA, INCX, BETA, INCY
923 CALL ZHEMV( UPLO, N, ALPHA, AA, LDA, XX,
928 $ UPLO, N, K, ALPHA, LDA, INCX, BETA,
932 CALL ZHBMV( UPLO, N, K, ALPHA, AA, LDA,
937 $ UPLO, N, ALPHA, INCX, BETA, INCY
940 CALL ZHPMV( UPLO, N, ALPHA, AA, XX, INCX,
[all …]
Dcblat2.f782 CHARACTER*1 UPLO, UPLOS local
850 UPLO = ICH( IC: IC )
855 CALL CMAKE( SNAME( 2: 3 ), UPLO, ' ', N, N, A, NMAX, AA,
894 UPLOS = UPLO
917 $ UPLO, N, ALPHA, LDA, INCX, BETA, INCY
920 CALL CHEMV( UPLO, N, ALPHA, AA, LDA, XX,
925 $ UPLO, N, K, ALPHA, LDA, INCX, BETA,
929 CALL CHBMV( UPLO, N, K, ALPHA, AA, LDA,
934 $ UPLO, N, ALPHA, INCX, BETA, INCY
937 CALL CHPMV( UPLO, N, ALPHA, AA, XX, INCX,
[all …]
/external/eigen/lapack/
Dcholesky.cpp17 if(UPLO(*uplo)==INVALID) *info = -1;
29 if(UPLO(*uplo)==UP) ret = internal::llt_inplace<Scalar, Upper>::blocked(A);
44 if(UPLO(*uplo)==INVALID) *info = -1;
60 if(UPLO(*uplo)==UP)

12