Home
last modified time | relevance | path

Searched refs:incy (Results 1 – 25 of 33) sorted by relevance

12

/external/eigen/blas/
Dlevel1_cplx_impl.h40 int EIGEN_BLAS_FUNC(dotcw)(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar…
50 if(*incx==1 && *incy==1) *res = (vector(x,*n).dot(vector(y,*n)));
51 else if(*incx>0 && *incy>0) *res = (vector(x,*n,*incx).dot(vector(y,*n,*incy)));
52 else if(*incx<0 && *incy>0) *res = (vector(x,*n,-*incx).reverse().dot(vector(y,*n,*incy)));
53 else if(*incx>0 && *incy<0) *res = (vector(x,*n,*incx).dot(vector(y,*n,-*incy).reverse()));
54 …else if(*incx<0 && *incy<0) *res = (vector(x,*n,-*incx).reverse().dot(vector(y,*n,-*incy).reverse(…
59 int EIGEN_BLAS_FUNC(dotuw)(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar…
69 if(*incx==1 && *incy==1) *res = (vector(x,*n).cwiseProduct(vector(y,*n))).sum();
70 else if(*incx>0 && *incy>0) *res = (vector(x,*n,*incx).cwiseProduct(vector(y,*n,*incy))).sum();
71 …else if(*incx<0 && *incy>0) *res = (vector(x,*n,-*incx).reverse().cwiseProduct(vector(y,*n,*incy))…
[all …]
Dlevel1_impl.h12 …N_BLAS_FUNC(axpy)(int *n, RealScalar *palpha, RealScalar *px, int *incx, RealScalar *py, int *incy) in EIGEN_BLAS_FUNC()
20 if(*incx==1 && *incy==1) vector(y,*n) += alpha * vector(x,*n); in EIGEN_BLAS_FUNC()
21 else if(*incx>0 && *incy>0) vector(y,*n,*incy) += alpha * vector(x,*n,*incx); in EIGEN_BLAS_FUNC()
22 else if(*incx>0 && *incy<0) vector(y,*n,-*incy).reverse() += alpha * vector(x,*n,*incx); in EIGEN_BLAS_FUNC()
23 else if(*incx<0 && *incy>0) vector(y,*n,*incy) += alpha * vector(x,*n,-*incx).reverse(); in EIGEN_BLAS_FUNC()
24 …else if(*incx<0 && *incy<0) vector(y,*n,-*incy).reverse() += alpha * vector(x,*n,-*incx).reverse(); in EIGEN_BLAS_FUNC()
29 int EIGEN_BLAS_FUNC(copy)(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy) in EIGEN_BLAS_FUNC()
37 if(*incx==1 && *incy==1) in EIGEN_BLAS_FUNC()
42 if(*incy<0) y = y - (*n-1)*(*incy); in EIGEN_BLAS_FUNC()
47 y += *incy; in EIGEN_BLAS_FUNC()
[all …]
Ddouble.cpp22 double BLASFUNC(dsdot)(int* n, float* x, int* incx, float* y, int* incy) in BLASFUNC()
26 …if(*incx==1 && *incy==1) return (vector(x,*n).cast<double>().cwiseProduct(vector(y,*n).cast<dou… in BLASFUNC()
27 …else if(*incx>0 && *incy>0) return (vector(x,*n,*incx).cast<double>().cwiseProduct(vector(y,*n,*in… in BLASFUNC()
28 …else if(*incx<0 && *incy>0) return (vector(x,*n,-*incx).reverse().cast<double>().cwiseProduct(vect… in BLASFUNC()
29 …else if(*incx>0 && *incy<0) return (vector(x,*n,*incx).cast<double>().cwiseProduct(vector(y,*n,-*i… in BLASFUNC()
30 …else if(*incx<0 && *incy<0) return (vector(x,*n,-*incx).reverse().cast<double>().cwiseProduct(vect… in BLASFUNC()
Dlevel1_real_impl.h27 Scalar EIGEN_BLAS_FUNC(dot)(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy) in EIGEN_BLAS_FUNC()
36 if(*incx==1 && *incy==1) return (vector(x,*n).cwiseProduct(vector(y,*n))).sum(); in EIGEN_BLAS_FUNC()
37 else if(*incx>0 && *incy>0) return (vector(x,*n,*incx).cwiseProduct(vector(y,*n,*incy))).sum(); in EIGEN_BLAS_FUNC()
38 …else if(*incx<0 && *incy>0) return (vector(x,*n,-*incx).reverse().cwiseProduct(vector(y,*n,*incy))… in EIGEN_BLAS_FUNC()
39 …else if(*incx>0 && *incy<0) return (vector(x,*n,*incx).cwiseProduct(vector(y,*n,-*incy).reverse())… in EIGEN_BLAS_FUNC()
40 …else if(*incx<0 && *incy<0) return (vector(x,*n,-*incx).reverse().cwiseProduct(vector(y,*n,-*incy)… in EIGEN_BLAS_FUNC()
57 int EIGEN_BLAS_FUNC(rot)(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar *… in EIGEN_BLAS_FUNC()
68 StridedVectorType vy(vector(y,*n,std::abs(*incy))); in EIGEN_BLAS_FUNC()
73 …if(*incx<0 && *incy>0) internal::apply_rotation_in_the_plane(rvx, vy, JacobiRotation<Scalar>(c,s)); in EIGEN_BLAS_FUNC()
74 …else if(*incx>0 && *incy<0) internal::apply_rotation_in_the_plane(vx, rvy, JacobiRotation<Scalar>(… in EIGEN_BLAS_FUNC()
Dlevel2_cplx_impl.h19 … RealScalar *pa, int *lda, RealScalar *px, int *incx, RealScalar *pbeta, RealScalar *py, int *incy) in EIGEN_BLAS_FUNC()
48 else if(*incy==0) info = 10; in EIGEN_BLAS_FUNC()
56 Scalar* actual_y = get_compact_vector(y,*n,*incy); in EIGEN_BLAS_FUNC()
74 if(actual_y!=y) delete[] copy_back(actual_y,y,*n,*incy); in EIGEN_BLAS_FUNC()
162 … int *n, RealScalar *palpha, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar *pap) in EIGEN_BLAS_FUNC()
188 else if(*incy==0) info = 7; in EIGEN_BLAS_FUNC()
196 Scalar* y_cpy = get_compact_vector(y, *n, *incy); in EIGEN_BLAS_FUNC()
271 …t *n, RealScalar *palpha, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar *pa, in… in EIGEN_BLAS_FUNC()
297 else if(*incy==0) info = 7; in EIGEN_BLAS_FUNC()
306 Scalar* y_cpy = get_compact_vector(y, *n, *incy); in EIGEN_BLAS_FUNC()
[all …]
Dlevel2_real_impl.h13 … RealScalar *pa, int *lda, RealScalar *px, int *incx, RealScalar *pbeta, RealScalar *py, int *incy) in EIGEN_BLAS_FUNC()
42 else if(*incy==0) info = 10; in EIGEN_BLAS_FUNC()
50 Scalar* actual_y = get_compact_vector(y,*n,*incy); in EIGEN_BLAS_FUNC()
65 if(actual_y!=y) delete[] copy_back(actual_y,y,*n,*incy); in EIGEN_BLAS_FUNC()
132 …t *n, RealScalar *palpha, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar *pc, in… in EIGEN_BLAS_FUNC()
172 else if(*incy==0) info = 7; in EIGEN_BLAS_FUNC()
181 Scalar* y_cpy = get_compact_vector(y,*n,*incy); in EIGEN_BLAS_FUNC()
285 … int *n, RealScalar *palpha, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar *pap) in EIGEN_BLAS_FUNC()
311 else if(*incy==0) info = 7; in EIGEN_BLAS_FUNC()
319 Scalar* y_cpy = get_compact_vector(y, *n, *incy); in EIGEN_BLAS_FUNC()
[all …]
/external/eigen/blas/f2c/
Dsspmv.c16 real *x, integer *incx, real *beta, real *y, integer *incy, ftnlen in sspmv_() argument
147 } else if (*incy == 0) { in sspmv_()
168 if (*incy > 0) { in sspmv_()
171 ky = 1 - (*n - 1) * *incy; in sspmv_()
180 if (*incy == 1) { in sspmv_()
200 iy += *incy; in sspmv_()
207 iy += *incy; in sspmv_()
221 if (*incx == 1 && *incy == 1) { in sspmv_()
252 iy += *incy; in sspmv_()
257 jy += *incy; in sspmv_()
[all …]
Ddspmv.c17 doublereal *y, integer *incy, ftnlen uplo_len) in dspmv_() argument
147 } else if (*incy == 0) { in dspmv_()
168 if (*incy > 0) { in dspmv_()
171 ky = 1 - (*n - 1) * *incy; in dspmv_()
180 if (*incy == 1) { in dspmv_()
200 iy += *incy; in dspmv_()
207 iy += *incy; in dspmv_()
221 if (*incx == 1 && *incy == 1) { in dspmv_()
252 iy += *incy; in dspmv_()
257 jy += *incy; in dspmv_()
[all …]
Dcomplexdots.c22 *incx, complex *cy, integer *incy) in cdotc_() argument
33 cdotcw_(n, &cx[1], incx, &cy[1], incy, &res); in cdotc_()
38 *incx, complex *cy, integer *incy) in cdotu_() argument
49 cdotuw_(n, &cx[1], incx, &cy[1], incy, &res); in cdotu_()
54 doublecomplex *cy, integer *incy) in zdotc_() argument
65 zdotcw_(n, &cx[1], incx, &cy[1], incy, &res); in zdotc_()
70 doublecomplex *cy, integer *incy) in zdotu_() argument
81 zdotuw_(n, &cx[1], incx, &cy[1], incy, &res); in zdotu_()
Ddsbmv.c17 doublereal *beta, doublereal *y, integer *incy, ftnlen uplo_len) in dsbmv_() argument
188 } else if (*incy == 0) { in dsbmv_()
209 if (*incy > 0) { in dsbmv_()
212 ky = 1 - (*n - 1) * *incy; in dsbmv_()
221 if (*incy == 1) { in dsbmv_()
241 iy += *incy; in dsbmv_()
248 iy += *incy; in dsbmv_()
262 if (*incx == 1 && *incy == 1) { in dsbmv_()
296 iy += *incy; in dsbmv_()
302 jy += *incy; in dsbmv_()
[all …]
Dssbmv.c17 integer *incy, ftnlen uplo_len) in ssbmv_() argument
190 } else if (*incy == 0) { in ssbmv_()
211 if (*incy > 0) { in ssbmv_()
214 ky = 1 - (*n - 1) * *incy; in ssbmv_()
223 if (*incy == 1) { in ssbmv_()
243 iy += *incy; in ssbmv_()
250 iy += *incy; in ssbmv_()
264 if (*incx == 1 && *incy == 1) { in ssbmv_()
298 iy += *incy; in ssbmv_()
304 jy += *incy; in ssbmv_()
[all …]
Dsrotm.c16 integer *incy, real *sparam) in srotm_() argument
100 if (! (*incx == *incy && *incx > 0)) { in srotm_()
159 if (*incy < 0) { in srotm_()
160 ky = (1 - *n) * *incy + 1; in srotm_()
180 ky += *incy; in srotm_()
194 ky += *incy; in srotm_()
210 ky += *incy; in srotm_()
Ddrotm.c16 doublereal *dy, integer *incy, doublereal *dparam) in drotm_() argument
99 if (! (*incx == *incy && *incx > 0)) { in drotm_()
158 if (*incy < 0) { in drotm_()
159 ky = (1 - *n) * *incy + 1; in drotm_()
179 ky += *incy; in drotm_()
193 ky += *incy; in drotm_()
209 ky += *incy; in drotm_()
Dchpmv.c17 incy, ftnlen uplo_len) in chpmv_()
156 } else if (*incy == 0) { in chpmv_()
178 if (*incy > 0) { in chpmv_()
181 ky = 1 - (*n - 1) * *incy; in chpmv_()
190 if (*incy == 1) { in chpmv_()
217 iy += *incy; in chpmv_()
229 iy += *incy; in chpmv_()
243 if (*incx == 1 && *incy == 1) { in chpmv_()
313 iy += *incy; in chpmv_()
327 jy += *incy; in chpmv_()
[all …]
Dzhpmv.c17 beta, doublecomplex *y, integer *incy, ftnlen uplo_len) in zhpmv_() argument
156 } else if (*incy == 0) { in zhpmv_()
178 if (*incy > 0) { in zhpmv_()
181 ky = 1 - (*n - 1) * *incy; in zhpmv_()
190 if (*incy == 1) { in zhpmv_()
217 iy += *incy; in zhpmv_()
229 iy += *incy; in zhpmv_()
243 if (*incx == 1 && *incy == 1) { in zhpmv_()
313 iy += *incy; in zhpmv_()
327 jy += *incy; in zhpmv_()
[all …]
Dzhbmv.c17 incx, doublecomplex *beta, doublecomplex *y, integer *incy, ftnlen in zhbmv_() argument
198 } else if (*incy == 0) { in zhbmv_()
220 if (*incy > 0) { in zhbmv_()
223 ky = 1 - (*n - 1) * *incy; in zhbmv_()
232 if (*incy == 1) { in zhbmv_()
259 iy += *incy; in zhbmv_()
271 iy += *incy; in zhbmv_()
285 if (*incx == 1 && *incy == 1) { in zhbmv_()
358 iy += *incy; in zhbmv_()
372 jy += *incy; in zhbmv_()
[all …]
Dchbmv.c17 beta, complex *y, integer *incy, ftnlen uplo_len) in chbmv_() argument
197 } else if (*incy == 0) { in chbmv_()
219 if (*incy > 0) { in chbmv_()
222 ky = 1 - (*n - 1) * *incy; in chbmv_()
231 if (*incy == 1) { in chbmv_()
258 iy += *incy; in chbmv_()
270 iy += *incy; in chbmv_()
284 if (*incx == 1 && *incy == 1) { in chbmv_()
357 iy += *incy; in chbmv_()
371 jy += *incy; in chbmv_()
[all …]
/external/cblas/testing/
Dc_zblas2.c14 const void *beta, void *y, int *incy) { in F77_zgemv() argument
30 beta, y, *incy ); in F77_zgemv()
35 *m, *n, alpha, a, *lda, x, *incx, beta, y, *incy ); in F77_zgemv()
38 *m, *n, alpha, a, *lda, x, *incx, beta, y, *incy ); in F77_zgemv()
44 CBLAS_TEST_ZOMPLEX *beta, CBLAS_TEST_ZOMPLEX *y, int *incy) { in F77_zgbmv() argument
77 *incx, beta, y, *incy ); in F77_zgbmv()
82 *incx, beta, y, *incy ); in F77_zgbmv()
85 *incx, beta, y, *incy ); in F77_zgbmv()
89 CBLAS_TEST_ZOMPLEX *x, int *incx, CBLAS_TEST_ZOMPLEX *y, int *incy, in F77_zgeru() argument
103 cblas_zgeru( CblasRowMajor, *m, *n, alpha, x, *incx, y, *incy, A, LDA ); in F77_zgeru()
[all …]
Dc_cblas2.c14 const void *beta, void *y, int *incy) { in F77_cgemv() argument
30 beta, y, *incy ); in F77_cgemv()
35 *m, *n, alpha, a, *lda, x, *incx, beta, y, *incy ); in F77_cgemv()
38 *m, *n, alpha, a, *lda, x, *incx, beta, y, *incy ); in F77_cgemv()
44 CBLAS_TEST_COMPLEX *beta, CBLAS_TEST_COMPLEX *y, int *incy) { in F77_cgbmv() argument
77 *incx, beta, y, *incy ); in F77_cgbmv()
82 *incx, beta, y, *incy ); in F77_cgbmv()
85 *incx, beta, y, *incy ); in F77_cgbmv()
89 CBLAS_TEST_COMPLEX *x, int *incx, CBLAS_TEST_COMPLEX *y, int *incy, in F77_cgeru() argument
103 cblas_cgeru( CblasRowMajor, *m, *n, alpha, x, *incx, y, *incy, A, LDA ); in F77_cgeru()
[all …]
Dc_sblas2.c13 float *y, int *incy ) { in F77_sgemv() argument
27 *m, *n, *alpha, A, LDA, x, *incx, *beta, y, *incy ); in F77_sgemv()
32 *m, *n, *alpha, a, *lda, x, *incx, *beta, y, *incy ); in F77_sgemv()
35 *m, *n, *alpha, a, *lda, x, *incx, *beta, y, *incy ); in F77_sgemv()
39 float *y, int *incy, float *a, int *lda ) { in F77_sger() argument
53 cblas_sger(CblasRowMajor, *m, *n, *alpha, x, *incx, y, *incy, A, LDA ); in F77_sger()
60 cblas_sger( CblasColMajor, *m, *n, *alpha, x, *incx, y, *incy, a, *lda ); in F77_sger()
117 int *incy) { in F77_ssymv() argument
131 *beta, y, *incy ); in F77_ssymv()
136 *beta, y, *incy ); in F77_ssymv()
[all …]
Dc_dblas2.c13 double *y, int *incy ) { in F77_dgemv() argument
27 *m, *n, *alpha, A, LDA, x, *incx, *beta, y, *incy ); in F77_dgemv()
32 *m, *n, *alpha, a, *lda, x, *incx, *beta, y, *incy ); in F77_dgemv()
35 *m, *n, *alpha, a, *lda, x, *incx, *beta, y, *incy ); in F77_dgemv()
39 double *y, int *incy, double *a, int *lda ) { in F77_dger() argument
53 cblas_dger(CblasRowMajor, *m, *n, *alpha, x, *incx, y, *incy, A, LDA ); in F77_dger()
60 cblas_dger( CblasColMajor, *m, *n, *alpha, x, *incx, y, *incy, a, *lda ); in F77_dger()
117 int *incy) { in F77_dsymv() argument
131 *beta, y, *incy ); in F77_dsymv()
136 *beta, y, *incy ); in F77_dsymv()
[all …]
/external/cblas/src/
Dcblas_zhpr2.c29 #define F77_incY incy in cblas_zhpr2()
31 int n, i, j, incx=incX, incy=incY; in cblas_zhpr2() local
124 incy = 1; in cblas_zhpr2()
126 incy = -1; in cblas_zhpr2()
Dcblas_cgerc.c22 #define F77_incY incy in cblas_cgerc()
26 int n, i, tincy, incy=incY; in cblas_cgerc() local
70 incy = 1; in cblas_cgerc()
/external/eigen/Eigen/src/Core/products/
DTriangularMatrixVector_MKL.h108 MKL_INT m, n, lda, incx, incy; \
118 incy = resIncr; \
129 MKLPREFIX##axpy(&n, &alpha_,(const MKLTYPE*)x, &incx, (MKLTYPE*)_res, &incy); \
148 … &m, &n, &alpha_, (const MKLTYPE*)a, &lda, (const MKLTYPE*)x, &incx, &beta_, (MKLTYPE*)y, &incy); \
193 MKL_INT m, n, lda, incx, incy; \
203 incy = resIncr; \
214 MKLPREFIX##axpy(&n, &alpha_,(const MKLTYPE*)x, &incx, (MKLTYPE*)_res, &incy); \
233 … &n, &m, &alpha_, (const MKLTYPE*)a, &lda, (const MKLTYPE*)x, &incx, &beta_, (MKLTYPE*)y, &incy); \
/external/cblas/examples/
Dcblas_example1.c14 int m, n, lda, incx, incy, i; in main() local
23 incy = 1; in main()
61 y, incy ); in main()

12