Home
last modified time | relevance | path

Searched refs:uplo (Results 1 – 25 of 41) sorted by relevance

12

/external/cblas/testing/
Dc_dblas2.c68 enum CBLAS_UPLO uplo; in F77_dtrmv() local
72 get_uplo_type(uplow,&uplo); in F77_dtrmv()
81 cblas_dtrmv(CblasRowMajor, uplo, trans, diag, *n, A, LDA, x, *incx); in F77_dtrmv()
85 cblas_dtrmv(CblasColMajor, uplo, trans, diag, *n, a, *lda, x, *incx); in F77_dtrmv()
87 cblas_dtrmv(UNDEFINED, uplo, trans, diag, *n, a, *lda, x, *incx); in F77_dtrmv()
96 enum CBLAS_UPLO uplo; in F77_dtrsv() local
100 get_uplo_type(uplow,&uplo); in F77_dtrsv()
109 cblas_dtrsv(CblasRowMajor, uplo, trans, diag, *n, A, LDA, x, *incx ); in F77_dtrsv()
113 cblas_dtrsv(CblasColMajor, uplo, trans, diag, *n, a, *lda, x, *incx ); in F77_dtrsv()
120 enum CBLAS_UPLO uplo; in F77_dsymv() local
[all …]
Dc_sblas2.c68 enum CBLAS_UPLO uplo; in F77_strmv() local
72 get_uplo_type(uplow,&uplo); in F77_strmv()
81 cblas_strmv(CblasRowMajor, uplo, trans, diag, *n, A, LDA, x, *incx); in F77_strmv()
85 cblas_strmv(CblasColMajor, uplo, trans, diag, *n, a, *lda, x, *incx); in F77_strmv()
87 cblas_strmv(UNDEFINED, uplo, trans, diag, *n, a, *lda, x, *incx); in F77_strmv()
96 enum CBLAS_UPLO uplo; in F77_strsv() local
100 get_uplo_type(uplow,&uplo); in F77_strsv()
109 cblas_strsv(CblasRowMajor, uplo, trans, diag, *n, A, LDA, x, *incx ); in F77_strsv()
113 cblas_strsv(CblasColMajor, uplo, trans, diag, *n, a, *lda, x, *incx ); in F77_strsv()
120 enum CBLAS_UPLO uplo; in F77_ssymv() local
[all …]
Dc_zblas2.c151 enum CBLAS_UPLO uplo; in F77_zhemv() local
153 get_uplo_type(uplow,&uplo); in F77_zhemv()
163 cblas_zhemv( CblasRowMajor, uplo, *n, alpha, A, LDA, x, *incx, in F77_zhemv()
168 cblas_zhemv( CblasColMajor, uplo, *n, alpha, a, *lda, x, *incx, in F77_zhemv()
171 cblas_zhemv( UNDEFINED, uplo, *n, alpha, a, *lda, x, *incx, in F77_zhemv()
183 enum CBLAS_UPLO uplo; in F77_zhbmv() local
185 get_uplo_type(uplow,&uplo); in F77_zhbmv()
188 if (uplo != CblasUpper && uplo != CblasLower ) in F77_zhbmv()
194 if (uplo == CblasUpper) { in F77_zhbmv()
226 cblas_zhbmv( CblasRowMajor, uplo, *n, *k, alpha, A, LDA, x, *incx, in F77_zhbmv()
[all …]
Dc_cblas2.c151 enum CBLAS_UPLO uplo; in F77_chemv() local
153 get_uplo_type(uplow,&uplo); in F77_chemv()
163 cblas_chemv( CblasRowMajor, uplo, *n, alpha, A, LDA, x, *incx, in F77_chemv()
168 cblas_chemv( CblasColMajor, uplo, *n, alpha, a, *lda, x, *incx, in F77_chemv()
171 cblas_chemv( UNDEFINED, uplo, *n, alpha, a, *lda, x, *incx, in F77_chemv()
183 enum CBLAS_UPLO uplo; in F77_chbmv() local
185 get_uplo_type(uplow,&uplo); in F77_chbmv()
188 if (uplo != CblasUpper && uplo != CblasLower ) in F77_chbmv()
194 if (uplo == CblasUpper) { in F77_chbmv()
226 cblas_chbmv( CblasRowMajor, uplo, *n, *k, alpha, A, LDA, x, *incx, in F77_chbmv()
[all …]
Dc_sblas3.c79 enum CBLAS_UPLO uplo; in F77_ssymm() local
82 get_uplo_type(uplow,&uplo); in F77_ssymm()
110 cblas_ssymm( CblasRowMajor, side, uplo, *m, *n, *alpha, A, LDA, B, LDB, in F77_ssymm()
120 cblas_ssymm( CblasColMajor, side, uplo, *m, *n, *alpha, a, *lda, b, *ldb, in F77_ssymm()
123 cblas_ssymm( UNDEFINED, side, uplo, *m, *n, *alpha, a, *lda, b, *ldb, in F77_ssymm()
133 enum CBLAS_UPLO uplo; in F77_ssyrk() local
136 get_uplo_type(uplow,&uplo); in F77_ssyrk()
159 cblas_ssyrk(CblasRowMajor, uplo, trans, *n, *k, *alpha, A, LDA, *beta, in F77_ssyrk()
168 cblas_ssyrk(CblasColMajor, uplo, trans, *n, *k, *alpha, a, *lda, *beta, in F77_ssyrk()
171 cblas_ssyrk(UNDEFINED, uplo, trans, *n, *k, *alpha, a, *lda, *beta, in F77_ssyrk()
[all …]
Dc_dblas3.c82 enum CBLAS_UPLO uplo; in F77_dsymm() local
85 get_uplo_type(uplow,&uplo); in F77_dsymm()
113 cblas_dsymm( CblasRowMajor, side, uplo, *m, *n, *alpha, A, LDA, B, LDB, in F77_dsymm()
123 cblas_dsymm( CblasColMajor, side, uplo, *m, *n, *alpha, a, *lda, b, *ldb, in F77_dsymm()
126 cblas_dsymm( UNDEFINED, side, uplo, *m, *n, *alpha, a, *lda, b, *ldb, in F77_dsymm()
136 enum CBLAS_UPLO uplo; in F77_dsyrk() local
139 get_uplo_type(uplow,&uplo); in F77_dsyrk()
162 cblas_dsyrk(CblasRowMajor, uplo, trans, *n, *k, *alpha, A, LDA, *beta, in F77_dsyrk()
171 cblas_dsyrk(CblasColMajor, uplo, trans, *n, *k, *alpha, a, *lda, *beta, in F77_dsyrk()
174 cblas_dsyrk(UNDEFINED, uplo, trans, *n, *k, *alpha, a, *lda, *beta, in F77_dsyrk()
[all …]
Dc_cblas3.c97 enum CBLAS_UPLO uplo; in F77_chemm() local
100 get_uplo_type(uplow,&uplo); in F77_chemm()
136 cblas_chemm( CblasRowMajor, side, uplo, *m, *n, alpha, A, LDA, B, LDB, in F77_chemm()
148 cblas_chemm( CblasColMajor, side, uplo, *m, *n, alpha, a, *lda, b, *ldb, in F77_chemm()
151 cblas_chemm( UNDEFINED, side, uplo, *m, *n, alpha, a, *lda, b, *ldb, in F77_chemm()
161 enum CBLAS_UPLO uplo; in F77_csymm() local
164 get_uplo_type(uplow,&uplo); in F77_csymm()
192 cblas_csymm( CblasRowMajor, side, uplo, *m, *n, alpha, A, LDA, B, LDB, in F77_csymm()
202 cblas_csymm( CblasColMajor, side, uplo, *m, *n, alpha, a, *lda, b, *ldb, in F77_csymm()
205 cblas_csymm( UNDEFINED, side, uplo, *m, *n, alpha, a, *lda, b, *ldb, in F77_csymm()
[all …]
Dc_zblas3.c97 enum CBLAS_UPLO uplo; in F77_zhemm() local
100 get_uplo_type(uplow,&uplo); in F77_zhemm()
136 cblas_zhemm( CblasRowMajor, side, uplo, *m, *n, alpha, A, LDA, B, LDB, in F77_zhemm()
148 cblas_zhemm( CblasColMajor, side, uplo, *m, *n, alpha, a, *lda, b, *ldb, in F77_zhemm()
151 cblas_zhemm( UNDEFINED, side, uplo, *m, *n, alpha, a, *lda, b, *ldb, in F77_zhemm()
161 enum CBLAS_UPLO uplo; in F77_zsymm() local
164 get_uplo_type(uplow,&uplo); in F77_zsymm()
192 cblas_zsymm( CblasRowMajor, side, uplo, *m, *n, alpha, A, LDA, B, LDB, in F77_zsymm()
202 cblas_zsymm( CblasColMajor, side, uplo, *m, *n, alpha, a, *lda, b, *ldb, in F77_zsymm()
205 cblas_zsymm( UNDEFINED, side, uplo, *m, *n, alpha, a, *lda, b, *ldb, in F77_zsymm()
[all …]
Dauxiliary.c18 void get_uplo_type(char *type, enum CBLAS_UPLO *uplo) { in get_uplo_type() argument
20 *uplo = CblasUpper; in get_uplo_type()
22 *uplo = CblasLower; in get_uplo_type()
23 else *uplo = UNDEFINED; in get_uplo_type()
/external/eigen/Eigen/src/Core/products/
DTriangularSolverMatrix_MKL.h57 char side = 'L', uplo, diag='N', transa; \
68 uplo = IsLower ? 'L' : 'U'; \
69 if (TriStorageOrder==RowMajor) uplo = (uplo == 'L') ? 'U' : 'L'; \
85 …MKLPREFIX##trsm(&side, &uplo, &transa, &diag, &m, &n, &alpha, (const MKLTYPE*)a, &lda, (MKLTYPE*)_…
112 char side = 'R', uplo, diag='N', transa; \
123 uplo = IsLower ? 'L' : 'U'; \
124 if (TriStorageOrder==RowMajor) uplo = (uplo == 'L') ? 'U' : 'L'; \
140 …MKLPREFIX##trsm(&side, &uplo, &transa, &diag, &m, &n, &alpha, (const MKLTYPE*)a, &lda, (MKLTYPE*)_…
DSelfadjointMatrixMatrix_MKL.h57 char side='L', uplo='L'; \
79 if (LhsStorageOrder==RowMajor) uplo='U'; \
89 …MKLPREFIX##symm(&side, &uplo, &m, &n, &alpha_, (const MKLTYPE*)a, &lda, (const MKLTYPE*)b, &ldb, &…
108 char side='L', uplo='L'; \
137 if (LhsStorageOrder==RowMajor) uplo='U'; \
157 …MKLPREFIX##hemm(&side, &uplo, &m, &n, &alpha_, (const MKLTYPE*)a, &lda, (const MKLTYPE*)b, &ldb, &…
184 char side='R', uplo='L'; \
205 if (RhsStorageOrder==RowMajor) uplo='U'; \
215 …MKLPREFIX##symm(&side, &uplo, &m, &n, &alpha_, (const MKLTYPE*)a, &lda, (const MKLTYPE*)b, &ldb, &…
234 char side='R', uplo='L'; \
[all …]
DTriangularMatrixMatrix_MKL.h133 char side = 'L', transa, uplo, diag = 'N'; \
158 uplo = IsLower ? 'L' : 'U'; \
159 if (LhsStorageOrder==RowMajor) uplo = (uplo == 'L') ? 'U' : 'L'; \
178 …MKLPREFIX##trmm(&side, &uplo, &transa, &diag, &m, &n, &alpha_, (const MKLTYPE*)a, &lda, (MKLTYPE*)…
247 char side = 'R', transa, uplo, diag = 'N'; \
272 uplo = IsLower ? 'L' : 'U'; \
273 if (RhsStorageOrder==RowMajor) uplo = (uplo == 'L') ? 'U' : 'L'; \
292 …MKLPREFIX##trmm(&side, &uplo, &transa, &diag, &m, &n, &alpha_, (const MKLTYPE*)a, &lda, (MKLTYPE*)…
DGeneralMatrixMatrixTriangular_MKL.h88 char uplo=(IsLower) ? 'L' : 'U', trans=(AStorageOrder==RowMajor) ? 'T':'N'; \
94 MKLFUNC(&uplo, &trans, &n, &k, &alpha_, lhs, &lda, &beta_, res, &ldc); \
113 char uplo=(IsLower) ? 'L' : 'U', trans=(AStorageOrder==RowMajor) ? 'C':'N'; \
130 MKLFUNC(&uplo, &trans, &n, &k, &alpha_, (MKLTYPE*)a_ptr, &lda, &beta_, (MKLTYPE*)res, &ldc); \
DTriangularMatrixVector_MKL.h107 char trans, uplo, diag; \
122 uplo = IsLower ? 'L' : 'U'; \
126 MKLPREFIX##trmv(&uplo, &trans, &diag, &n, (const MKLTYPE*)_lhs, &lda, (MKLTYPE*)x, &incx); \
192 char trans, uplo, diag; \
207 uplo = IsLower ? 'U' : 'L'; \
211 MKLPREFIX##trmv(&uplo, &trans, &diag, &n, (const MKLTYPE*)_lhs, &lda, (MKLTYPE*)x, &incx); \
/external/eigen/blas/
Dlevel2_real_impl.h13 int EIGEN_BLAS_FUNC(symv) (char *uplo, int *n, RealScalar *palpha, RealScalar *pa, int *lda, RealSc… in EIGEN_BLAS_FUNC()
38 if(UPLO(*uplo)==INVALID) info = 1; in EIGEN_BLAS_FUNC()
58 int code = UPLO(*uplo); in EIGEN_BLAS_FUNC()
71 int EIGEN_BLAS_FUNC(syr)(char *uplo, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealSca… in EIGEN_BLAS_FUNC()
108 if(UPLO(*uplo)==INVALID) info = 1; in EIGEN_BLAS_FUNC()
120 int code = UPLO(*uplo); in EIGEN_BLAS_FUNC()
132 int EIGEN_BLAS_FUNC(syr2)(char *uplo, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealSc… in EIGEN_BLAS_FUNC()
169 if(UPLO(*uplo)==INVALID) info = 1; in EIGEN_BLAS_FUNC()
183 int code = UPLO(*uplo); in EIGEN_BLAS_FUNC()
234 int EIGEN_BLAS_FUNC(spr)(char *uplo, int *n, Scalar *palpha, Scalar *px, int *incx, Scalar *pap) in EIGEN_BLAS_FUNC()
[all …]
Dlevel2_cplx_impl.h19 int EIGEN_BLAS_FUNC(hemv)(char *uplo, int *n, RealScalar *palpha, RealScalar *pa, int *lda, RealSca… in EIGEN_BLAS_FUNC()
44 if(UPLO(*uplo)==INVALID) info = 1; in EIGEN_BLAS_FUNC()
66 int code = UPLO(*uplo); in EIGEN_BLAS_FUNC()
111 int EIGEN_BLAS_FUNC(hpr)(char *uplo, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealSca… in EIGEN_BLAS_FUNC()
133 if(UPLO(*uplo)==INVALID) info = 1; in EIGEN_BLAS_FUNC()
144 int code = UPLO(*uplo); in EIGEN_BLAS_FUNC()
162 int EIGEN_BLAS_FUNC(hpr2)(char *uplo, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealSc… in EIGEN_BLAS_FUNC()
185 if(UPLO(*uplo)==INVALID) info = 1; in EIGEN_BLAS_FUNC()
198 int code = UPLO(*uplo); in EIGEN_BLAS_FUNC()
217 int EIGEN_BLAS_FUNC(her)(char *uplo, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealSca… in EIGEN_BLAS_FUNC()
[all …]
Dlevel3_impl.h66 int EIGEN_BLAS_FUNC(trsm)(char *side, char *uplo, char *opa, char *diag, int *m, int *n, RealScalar… in EIGEN_BLAS_FUNC()
120 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()
152 int EIGEN_BLAS_FUNC(trmm)(char *side, char *uplo, char *opa, char *diag, int *m, int *n, RealScalar… 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()
238 int EIGEN_BLAS_FUNC(symm)(char *side, char *uplo, int *m, int *n, RealScalar *palpha, RealScalar *p… 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()
[all …]
Dlevel2_impl.h76 int EIGEN_BLAS_FUNC(trsv)(char *uplo, char *opa, char *diag, int *n, RealScalar *pa, int *lda, Real… in EIGEN_BLAS_FUNC()
110 if(UPLO(*uplo)==INVALID) info = 1; in EIGEN_BLAS_FUNC()
121 int code = OP(*opa) | (UPLO(*uplo) << 2) | (DIAG(*diag) << 3); in EIGEN_BLAS_FUNC()
131 int EIGEN_BLAS_FUNC(trmv)(char *uplo, char *opa, char *diag, int *n, RealScalar *pa, int *lda, Real… in EIGEN_BLAS_FUNC()
165 if(UPLO(*uplo)==INVALID) info = 1; in EIGEN_BLAS_FUNC()
181 int code = OP(*opa) | (UPLO(*uplo) << 2) | (DIAG(*diag) << 3); in EIGEN_BLAS_FUNC()
270 int EIGEN_BLAS_FUNC(tbmv)(char *uplo, char *opa, char *diag, int *n, int *k, RealScalar *pa, int *l…
277 if(UPLO(*uplo)==INVALID) info = 1;
296 int ku = UPLO(*uplo)==UPPER ? *k : 0;
297 int kl = UPLO(*uplo)==LOWER ? *k : 0;
[all …]
/external/eigen/lapack/
Dcholesky.cpp14 EIGEN_LAPACK_FUNC(potrf,(char* uplo, int *n, RealScalar *pa, int *lda, int *info))
17 if(UPLO(*uplo)==INVALID) *info = -1;
29 if(UPLO(*uplo)==UP) ret = int(internal::llt_inplace<Scalar, Upper>::blocked(A));
41 EIGEN_LAPACK_FUNC(potrs,(char* uplo, int *n, int *nrhs, RealScalar *pa, int *lda, RealScalar *pb, i…
44 if(UPLO(*uplo)==INVALID) *info = -1;
60 if(UPLO(*uplo)==UP)
Deigenvalues.cpp14 EIGEN_LAPACK_FUNC(syev,(char *jobz, char *uplo, int* n, Scalar* a, int *lda, Scalar* w, Scalar* /*w…
21 else if(UPLO(*uplo)==INVALID) *info = -2;
59 if(UPLO(*uplo)==UP) mat = matrix(a,*n,*n,*lda).adjoint();
/external/ceres-solver/internal/ceres/
Dlapack.cc38 extern "C" void dpotrf_(char* uplo,
44 extern "C" void dpotrs_(char* uplo,
53 extern "C" void dgels_(char* uplo,
78 char uplo = 'L'; in SolveInPlaceUsingCholesky()
84 dpotrf_(&uplo, &n, lhs, &n, &info); in SolveInPlaceUsingCholesky()
101 dpotrs_(&uplo, &n, &nrhs, lhs, &n, rhs_and_solution, &n, &info); in SolveInPlaceUsingCholesky()
Dblas.cc35 extern "C" void dsyrk_(char* uplo,
59 char uplo = 'L'; in SymmetricRankKUpdate()
65 dsyrk_(&uplo, in SymmetricRankKUpdate()
/external/eigen/bench/btl/libs/BLAS/
Dblas_interface_impl.hh69 char uplo = 'L'; in cholesky() local
71 BLAS_FUNC(potrf)(&uplo, &N, C, &N, &info); in cholesky()
78 char uplo = 'L'; in partial_lu_decomp() local
104 char uplo = 'L'; in lu_decomp() local
135 char uplo = 'U'; in tridiagonalization() local
142 BLAS_FUNC(sytrd)(&uplo, &N, C, &N, d, d+N, d+2*N, d+3*N, &worksize, &info); in tridiagonalization()
/external/eigen/blas/f2c/
Ddspmv.c15 /* Subroutine */ int dspmv_(char *uplo, integer *n, doublereal *alpha, in dspmv_() argument
140 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", ( in dspmv_()
217 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) { in dspmv_()
Dsspmv.c15 /* Subroutine */ int sspmv_(char *uplo, integer *n, real *alpha, real *ap, in sspmv_() argument
140 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", ( in sspmv_()
217 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) { in sspmv_()

12