/external/eigen/blas/ |
D | level1_cplx_impl.h | 28 …lar EIGEN_CAT(EIGEN_CAT(REAL_SCALAR_SUFFIX,SCALAR_SUFFIX),asum_)(int *n, RealScalar *px, int *incx) 35 if(*incx==1) return make_vector(x,*n).unaryExpr<scalar_norm1_op>().sum(); 36 else return make_vector(x,*n,std::abs(*incx)).unaryExpr<scalar_norm1_op>().sum(); 40 int EIGEN_BLAS_FUNC(dotcw)(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar… 54 if(*incx==1 && *incy==1) *res = (make_vector(x,*n).dot(make_vector(y,*n))); 55 else if(*incx>0 && *incy>0) *res = (make_vector(x,*n,*incx).dot(make_vector(y,*n,*incy))); 56 …else if(*incx<0 && *incy>0) *res = (make_vector(x,*n,-*incx).reverse().dot(make_vector(y,*n,*incy)… 57 …else if(*incx>0 && *incy<0) *res = (make_vector(x,*n,*incx).dot(make_vector(y,*n,-*incy).reverse()… 58 …else if(*incx<0 && *incy<0) *res = (make_vector(x,*n,-*incx).reverse().dot(make_vector(y,*n,-*incy… 63 int EIGEN_BLAS_FUNC(dotuw)(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar… [all …]
|
D | level1_impl.h | 12 …(const int *n, const RealScalar *palpha, const RealScalar *px, const int *incx, RealScalar *py, co… in EIGEN_BLAS_FUNC() 20 if(*incx==1 && *incy==1) make_vector(y,*n) += alpha * make_vector(x,*n); in EIGEN_BLAS_FUNC() 21 else if(*incx>0 && *incy>0) make_vector(y,*n,*incy) += alpha * make_vector(x,*n,*incx); in EIGEN_BLAS_FUNC() 22 else if(*incx>0 && *incy<0) make_vector(y,*n,-*incy).reverse() += alpha * make_vector(x,*n,*incx); in EIGEN_BLAS_FUNC() 23 else if(*incx<0 && *incy>0) make_vector(y,*n,*incy) += alpha * make_vector(x,*n,-*incx).reverse(); in EIGEN_BLAS_FUNC() 24 …else if(*incx<0 && *incy<0) make_vector(y,*n,-*incy).reverse() += alpha * make_vector(x,*n,-*incx)… 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() 41 if(*incx<0) x = x - (*n-1)*(*incx); in EIGEN_BLAS_FUNC() 46 x += *incx; in EIGEN_BLAS_FUNC() [all …]
|
D | level1_real_impl.h | 14 RealScalar EIGEN_BLAS_FUNC(asum)(int *n, RealScalar *px, int *incx) in EIGEN_BLAS_FUNC() 22 if(*incx==1) return make_vector(x,*n).cwiseAbs().sum(); in EIGEN_BLAS_FUNC() 23 else return make_vector(x,*n,std::abs(*incx)).cwiseAbs().sum(); in EIGEN_BLAS_FUNC() 27 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 (make_vector(x,*n).cwiseProduct(make_vector(y,*n))).sum(); in EIGEN_BLAS_FUNC() 37 …else if(*incx>0 && *incy>0) return (make_vector(x,*n,*incx).cwiseProduct(make_vector(y,*n,*incy)))… in EIGEN_BLAS_FUNC() 38 …else if(*incx<0 && *incy>0) return (make_vector(x,*n,-*incx).reverse().cwiseProduct(make_vector(y,… in EIGEN_BLAS_FUNC() 39 …else if(*incx>0 && *incy<0) return (make_vector(x,*n,*incx).cwiseProduct(make_vector(y,*n,-*incy).… in EIGEN_BLAS_FUNC() 40 …else if(*incx<0 && *incy<0) return (make_vector(x,*n,-*incx).reverse().cwiseProduct(make_vector(y,… in EIGEN_BLAS_FUNC() 46 Scalar EIGEN_BLAS_FUNC(nrm2)(int *n, RealScalar *px, int *incx) in EIGEN_BLAS_FUNC() [all …]
|
D | double.cpp | 22 double BLASFUNC(dsdot)(int* n, float* x, int* incx, float* y, int* incy) in BLASFUNC() 26 …if(*incx==1 && *incy==1) return (make_vector(x,*n).cast<double>().cwiseProduct(make_vector(y,*n… in BLASFUNC() 27 …else if(*incx>0 && *incy>0) return (make_vector(x,*n,*incx).cast<double>().cwiseProduct(make_vecto… in BLASFUNC() 28 …else if(*incx<0 && *incy>0) return (make_vector(x,*n,-*incx).reverse().cast<double>().cwiseProduct… in BLASFUNC() 29 …else if(*incx>0 && *incy<0) return (make_vector(x,*n,*incx).cast<double>().cwiseProduct(make_vecto… in BLASFUNC() 30 …else if(*incx<0 && *incy<0) return (make_vector(x,*n,-*incx).reverse().cast<double>().cwiseProduct… in BLASFUNC()
|
D | level2_cplx_impl.h | 20 … const RealScalar *px, const int *incx, const RealScalar *pbeta, RealScalar *py, const int *incy) in EIGEN_BLAS_FUNC() 41 else if(*incx==0) info = 7; in EIGEN_BLAS_FUNC() 49 const Scalar* actual_x = get_compact_vector(x,*n,*incx); in EIGEN_BLAS_FUNC() 105 int EIGEN_BLAS_FUNC(hpr)(char *uplo, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealSca… in EIGEN_BLAS_FUNC() 122 else if(*incx==0) info = 5; in EIGEN_BLAS_FUNC() 129 Scalar* x_cpy = get_compact_vector(x, *n, *incx); in EIGEN_BLAS_FUNC() 149 int EIGEN_BLAS_FUNC(hpr2)(char *uplo, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealSc… in EIGEN_BLAS_FUNC() 167 else if(*incx==0) info = 5; in EIGEN_BLAS_FUNC() 175 Scalar* x_cpy = get_compact_vector(x, *n, *incx); in EIGEN_BLAS_FUNC() 197 int EIGEN_BLAS_FUNC(her)(char *uplo, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealSca… in EIGEN_BLAS_FUNC() [all …]
|
D | level2_real_impl.h | 14 … const RealScalar *px, const int *incx, const RealScalar *pbeta, RealScalar *py, const int *incy) in EIGEN_BLAS_FUNC() 35 else if(*incx==0) info = 7; in EIGEN_BLAS_FUNC() 43 const Scalar* actual_x = get_compact_vector(x,*n,*incx); in EIGEN_BLAS_FUNC() 65 … const int *n, const RealScalar *palpha, const RealScalar *px, const int *incx, RealScalar *pc, co… in EIGEN_BLAS_FUNC() 83 else if(*incx==0) info = 5; in EIGEN_BLAS_FUNC() 91 const Scalar* x_cpy = get_compact_vector(x,*n,*incx); in EIGEN_BLAS_FUNC() 105 … const int *n, const RealScalar *palpha, const RealScalar *px, const int *incx, const RealScalar *… in EIGEN_BLAS_FUNC() 123 else if(*incx==0) info = 5; in EIGEN_BLAS_FUNC() 132 const Scalar* x_cpy = get_compact_vector(x,*n,*incx); in EIGEN_BLAS_FUNC() 186 int EIGEN_BLAS_FUNC(spr)(char *uplo, int *n, Scalar *palpha, Scalar *px, int *incx, Scalar *pap) in EIGEN_BLAS_FUNC() [all …]
|
/external/eigen/blas/f2c/ |
D | stbmv.c | 16 integer *k, real *a, integer *lda, real *x, integer *incx, ftnlen in stbmv_() argument 203 } else if (*incx == 0) { in stbmv_() 222 if (*incx <= 0) { in stbmv_() 223 kx = 1 - (*n - 1) * *incx; in stbmv_() 224 } else if (*incx != 1) { in stbmv_() 237 if (*incx == 1) { in stbmv_() 269 ix += *incx; in stbmv_() 276 jx += *incx; in stbmv_() 278 kx += *incx; in stbmv_() 284 if (*incx == 1) { in stbmv_() [all …]
|
D | dtbmv.c | 16 integer *k, doublereal *a, integer *lda, doublereal *x, integer *incx, in dtbmv_() argument 203 } else if (*incx == 0) { in dtbmv_() 222 if (*incx <= 0) { in dtbmv_() 223 kx = 1 - (*n - 1) * *incx; in dtbmv_() 224 } else if (*incx != 1) { in dtbmv_() 237 if (*incx == 1) { in dtbmv_() 269 ix += *incx; in dtbmv_() 276 jx += *incx; in dtbmv_() 278 kx += *incx; in dtbmv_() 284 if (*incx == 1) { in dtbmv_() [all …]
|
D | srotm.c | 15 /* Subroutine */ int srotm_(integer *n, real *sx, integer *incx, real *sy, in srotm_() argument 100 if (! (*incx == *incy && *incx > 0)) { in srotm_() 104 nsteps = *n * *incx; in srotm_() 116 i__2 = *incx; in srotm_() 129 i__1 = *incx; in srotm_() 144 i__2 = *incx; in srotm_() 156 if (*incx < 0) { in srotm_() 157 kx = (1 - *n) * *incx + 1; in srotm_() 179 kx += *incx; in srotm_() 193 kx += *incx; in srotm_() [all …]
|
D | drotm.c | 15 /* Subroutine */ int drotm_(integer *n, doublereal *dx, integer *incx, in drotm_() argument 99 if (! (*incx == *incy && *incx > 0)) { in drotm_() 103 nsteps = *n * *incx; in drotm_() 115 i__2 = *incx; in drotm_() 128 i__1 = *incx; in drotm_() 143 i__2 = *incx; in drotm_() 155 if (*incx < 0) { in drotm_() 156 kx = (1 - *n) * *incx + 1; in drotm_() 178 kx += *incx; in drotm_() 192 kx += *incx; in drotm_() [all …]
|
D | complexdots.c | 22 *incx, complex *cy, integer *incy) in cdotc_() 33 cdotcw_(n, &cx[1], incx, &cy[1], incy, &res); in cdotc_() 38 *incx, complex *cy, integer *incy) in cdotu_() 49 cdotuw_(n, &cx[1], incx, &cy[1], incy, &res); in cdotu_() 53 doublecomplex zdotc_(integer *n, doublecomplex *cx, integer *incx, in zdotc_() argument 65 zdotcw_(n, &cx[1], incx, &cy[1], incy, &res); in zdotc_() 69 doublecomplex zdotu_(integer *n, doublecomplex *cx, integer *incx, in zdotu_() argument 81 zdotuw_(n, &cx[1], incx, &cy[1], incy, &res); in zdotu_()
|
D | dspmv.c | 16 doublereal *ap, doublereal *x, integer *incx, doublereal *beta, in dspmv_() argument 145 } else if (*incx == 0) { in dspmv_() 163 if (*incx > 0) { in dspmv_() 166 kx = 1 - (*n - 1) * *incx; in dspmv_() 221 if (*incx == 1 && *incy == 1) { in dspmv_() 251 ix += *incx; in dspmv_() 256 jx += *incx; in dspmv_() 266 if (*incx == 1 && *incy == 1) { in dspmv_() 296 ix += *incx; in dspmv_() 303 jx += *incx; in dspmv_()
|
D | sspmv.c | 16 real *x, integer *incx, real *beta, real *y, integer *incy, ftnlen in sspmv_() argument 145 } else if (*incx == 0) { in sspmv_() 163 if (*incx > 0) { in sspmv_() 166 kx = 1 - (*n - 1) * *incx; in sspmv_() 221 if (*incx == 1 && *incy == 1) { in sspmv_() 251 ix += *incx; in sspmv_() 256 jx += *incx; in sspmv_() 266 if (*incx == 1 && *incy == 1) { in sspmv_() 296 ix += *incx; in sspmv_() 303 jx += *incx; in sspmv_()
|
D | ssbmv.c | 16 real *a, integer *lda, real *x, integer *incx, real *beta, real *y, in ssbmv_() argument 188 } else if (*incx == 0) { in ssbmv_() 206 if (*incx > 0) { in ssbmv_() 209 kx = 1 - (*n - 1) * *incx; in ssbmv_() 264 if (*incx == 1 && *incy == 1) { in ssbmv_() 297 ix += *incx; in ssbmv_() 303 jx += *incx; in ssbmv_() 306 kx += *incx; in ssbmv_() 316 if (*incx == 1 && *incy == 1) { in ssbmv_() 349 ix += *incx; in ssbmv_() [all …]
|
/external/tensorflow/tensorflow/stream_executor/cuda/ |
D | cuda_blas.cc | 434 const DeviceMemory<float> &x, int incx, in DoBlasAsum() argument 437 elem_count, GpuMemory(x), incx, in DoBlasAsum() 442 const DeviceMemory<double> &x, int incx, in DoBlasAsum() argument 445 elem_count, GpuMemory(x), incx, in DoBlasAsum() 450 const DeviceMemory<std::complex<float>> &x, int incx, in DoBlasAsum() argument 453 elem_count, GpuComplex(GpuMemory(x)), incx, in DoBlasAsum() 458 const DeviceMemory<std::complex<double>> &x, int incx, in DoBlasAsum() argument 461 elem_count, GpuComplex(GpuMemory(x)), incx, in DoBlasAsum() 466 const DeviceMemory<float> &x, int incx, in DoBlasAxpy() argument 469 elem_count, &alpha, GpuMemory(x), incx, in DoBlasAxpy() [all …]
|
D | cublas_9_0.inc | 90 int incx, void *devicePtr, int incy) { 94 return func_ptr(n, elemSize, x, incx, devicePtr, incy); 98 int incx, void *y, int incy) { 102 return func_ptr(n, elemSize, x, incx, y, incy); 124 const void *hostPtr, int incx, 130 return func_ptr(n, elemSize, hostPtr, incx, devicePtr, incy, stream); 134 const void *devicePtr, int incx, 140 return func_ptr(n, elemSize, devicePtr, incx, hostPtr, incy, stream); 172 int incx, 179 return func_ptr(handle, n, x, xType, incx, result, resultType, executionType); [all …]
|
D | cublas_10_0.inc | 111 int incx, void *devicePtr, int incy) { 115 return func_ptr(n, elemSize, x, incx, devicePtr, incy); 119 int incx, void *y, int incy) { 123 return func_ptr(n, elemSize, x, incx, y, incy); 145 const void *hostPtr, int incx, 151 return func_ptr(n, elemSize, hostPtr, incx, devicePtr, incy, stream); 155 const void *devicePtr, int incx, 161 return func_ptr(n, elemSize, devicePtr, incx, hostPtr, incy, stream); 193 int incx, 200 return func_ptr(handle, n, x, xType, incx, result, resultType, executionType); [all …]
|
/external/tensorflow/tensorflow/stream_executor/ |
D | blas.h | 182 const DeviceMemory<float> &x, int incx, 185 const DeviceMemory<double> &x, int incx, 188 const DeviceMemory<std::complex<float>> &x, int incx, 191 const DeviceMemory<std::complex<double>> &x, int incx, 196 const DeviceMemory<float> &x, int incx, 199 const DeviceMemory<double> &x, int incx, 203 const DeviceMemory<std::complex<float>> &x, int incx, 207 const DeviceMemory<std::complex<double>> &x, int incx, 212 const DeviceMemory<float> &x, int incx, 215 const DeviceMemory<double> &x, int incx, [all …]
|
D | stream.cc | 1916 int incx, DeviceMemory<float> *result) { in ThenBlasAsum() argument 1917 VLOG_CALL(PARAM(elem_count), PARAM(x), PARAM(incx), PARAM(result)); in ThenBlasAsum() 1921 return impl(this, &blas::BlasSupport::DoBlasAsum, elem_count, x, incx, in ThenBlasAsum() 1926 int incx, DeviceMemory<double> *result) { in ThenBlasAsum() argument 1927 VLOG_CALL(PARAM(elem_count), PARAM(x), PARAM(incx), PARAM(result)); in ThenBlasAsum() 1931 return impl(this, &blas::BlasSupport::DoBlasAsum, elem_count, x, incx, in ThenBlasAsum() 1937 int incx, DeviceMemory<float> *result) { in ThenBlasAsum() argument 1938 VLOG_CALL(PARAM(elem_count), PARAM(x), PARAM(incx), PARAM(result)); in ThenBlasAsum() 1942 return impl(this, &blas::BlasSupport::DoBlasAsum, elem_count, x, incx, in ThenBlasAsum() 1948 int incx, DeviceMemory<double> *result) { in ThenBlasAsum() argument [all …]
|
D | stream.h | 721 int incx, DeviceMemory<float> *result); 723 int incx, DeviceMemory<double> *result); 725 const DeviceMemory<std::complex<float>> &x, int incx, 728 const DeviceMemory<std::complex<double>> &x, int incx, 737 const DeviceMemory<float> &x, int incx, 740 const DeviceMemory<double> &x, int incx, 743 const DeviceMemory<std::complex<float>> &x, int incx, 746 const DeviceMemory<std::complex<double>> &x, int incx, 751 int incx, DeviceMemory<float> *y, int incy); 753 int incx, DeviceMemory<double> *y, int incy); [all …]
|
/external/tensorflow/tensorflow/stream_executor/rocm/ |
D | rocm_blas.cc | 401 const DeviceMemory<float> &x, int incx, in DoBlasAsum() argument 405 GpuMemory(x), incx, GpuMemoryMutable(result)); in DoBlasAsum() 409 const DeviceMemory<double> &x, int incx, in DoBlasAsum() argument 413 GpuMemory(x), incx, GpuMemoryMutable(result)); in DoBlasAsum() 417 const DeviceMemory<std::complex<float>> &x, int incx, in DoBlasAsum() argument 425 const DeviceMemory<std::complex<double>> &x, int incx, in DoBlasAsum() argument 433 const DeviceMemory<float> &x, int incx, in DoBlasAxpy() argument 437 GpuMemory(x), incx, GpuMemoryMutable(y), incy); in DoBlasAxpy() 441 const DeviceMemory<double> &x, int incx, in DoBlasAxpy() argument 445 GpuMemory(x), incx, GpuMemoryMutable(y), incy); in DoBlasAxpy() [all …]
|
/external/cblas/testing/ |
D | c_cblas2.c | 13 CBLAS_TEST_COMPLEX *a, int *lda, const void *x, int *incx, in F77_cgemv() argument 29 cblas_cgemv( CblasRowMajor, trans, *m, *n, alpha, A, LDA, x, *incx, 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() 43 CBLAS_TEST_COMPLEX *x, int *incx, 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 …]
|
D | c_zblas2.c | 13 CBLAS_TEST_ZOMPLEX *a, int *lda, const void *x, int *incx, in F77_zgemv() argument 29 cblas_zgemv( CblasRowMajor, trans, *m, *n, alpha, A, LDA, x, *incx, 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() 43 CBLAS_TEST_ZOMPLEX *x, int *incx, 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 …]
|
D | c_dblas2.c | 12 double *a, int *lda, double *x, int *incx, double *beta, 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() 38 void F77_dger(int *order, int *m, int *n, double *alpha, double *x, int *incx, 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() 64 int *n, double *a, int *lda, double *x, int *incx) { in F77_dtrmv() argument 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() [all …]
|
D | c_sblas2.c | 12 float *a, int *lda, float *x, int *incx, float *beta, 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() 38 void F77_sger(int *order, int *m, int *n, float *alpha, float *x, int *incx, 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() 64 int *n, float *a, int *lda, float *x, int *incx) { in F77_strmv() argument 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() [all …]
|