/external/eigen/blas/ |
D | level1_cplx_impl.h | 28 RealScalar EIGEN_CAT(REAL_SCALAR_SUFFIX, EIGEN_BLAS_FUNC(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(); 39 int EIGEN_CAT(i, EIGEN_BLAS_FUNC(amax))(int *n, RealScalar *px, int *incx) 45 if(*incx==1) make_vector(x,*n).unaryExpr<scalar_norm1_op>().maxCoeff(&ret); 46 else make_vector(x,*n,std::abs(*incx)).unaryExpr<scalar_norm1_op>().maxCoeff(&ret); 50 int EIGEN_CAT(i, EIGEN_BLAS_FUNC(amin))(int *n, RealScalar *px, int *incx) 56 if(*incx==1) make_vector(x,*n).unaryExpr<scalar_norm1_op>().minCoeff(&ret); 57 else make_vector(x,*n,std::abs(*incx)).unaryExpr<scalar_norm1_op>().minCoeff(&ret); 62 int EIGEN_BLAS_FUNC(dotcw)(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar… [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() 26 int EIGEN_CAT(i, EIGEN_BLAS_FUNC(amax))(int *n, RealScalar *px, int *incx) in EIGEN_CAT() 32 if(*incx==1) make_vector(x,*n).cwiseAbs().maxCoeff(&ret); in EIGEN_CAT() 33 else make_vector(x,*n,std::abs(*incx)).cwiseAbs().maxCoeff(&ret); in EIGEN_CAT() 37 int EIGEN_CAT(i, EIGEN_BLAS_FUNC(amin))(int *n, RealScalar *px, int *incx) in EIGEN_CAT() 43 if(*incx==1) make_vector(x,*n).cwiseAbs().minCoeff(&ret); in EIGEN_CAT() 44 else make_vector(x,*n,std::abs(*incx)).cwiseAbs().minCoeff(&ret); in EIGEN_CAT() 49 Scalar EIGEN_BLAS_FUNC(dot)(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy) in EIGEN_BLAS_FUNC() [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 | double.cpp | 22 double EIGEN_BLAS_FUNC(sdot)(int* n, float* x, int* incx, float* y, int* incy) in EIGEN_BLAS_FUNC() 26 …if(*incx==1 && *incy==1) return (make_vector(x,*n).cast<double>().cwiseProduct(make_vector(y,*n… in EIGEN_BLAS_FUNC() 27 …else if(*incx>0 && *incy>0) return (make_vector(x,*n,*incx).cast<double>().cwiseProduct(make_vecto… in EIGEN_BLAS_FUNC() 28 …else if(*incx<0 && *incy>0) return (make_vector(x,*n,-*incx).reverse().cast<double>().cwiseProduct… in EIGEN_BLAS_FUNC() 29 …else if(*incx>0 && *incy<0) return (make_vector(x,*n,*incx).cast<double>().cwiseProduct(make_vecto… in EIGEN_BLAS_FUNC() 30 …else if(*incx<0 && *incy<0) return (make_vector(x,*n,-*incx).reverse().cast<double>().cwiseProduct… in EIGEN_BLAS_FUNC()
|
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 | 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 | 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 | 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 …]
|
D | dsbmv.c | 16 alpha, doublereal *a, integer *lda, doublereal *x, integer *incx, in dsbmv_() argument 186 } else if (*incx == 0) { in dsbmv_() 204 if (*incx > 0) { in dsbmv_() 207 kx = 1 - (*n - 1) * *incx; in dsbmv_() 262 if (*incx == 1 && *incy == 1) { in dsbmv_() 295 ix += *incx; in dsbmv_() 301 jx += *incx; in dsbmv_() 304 kx += *incx; in dsbmv_() 314 if (*incx == 1 && *incy == 1) { in dsbmv_() 347 ix += *incx; in dsbmv_() [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 …]
|
/external/tensorflow/tensorflow/compiler/xla/stream_executor/cuda/ |
D | cublas_9_0.inc | 106 int incx, void *devicePtr, 112 return func_ptr(n, elemSize, x, incx, devicePtr, incy); 116 int incx, void *y, int incy) { 121 return func_ptr(n, elemSize, x, incx, y, incy); 145 const void *hostPtr, int incx, 152 return func_ptr(n, elemSize, hostPtr, incx, devicePtr, incy, stream); 157 int incx, void *hostPtr, 164 return func_ptr(n, elemSize, devicePtr, incx, hostPtr, incy, stream); 198 int incx, void *result, 206 return func_ptr(handle, n, x, xType, incx, result, resultType, executionType); [all …]
|
D | cublas_11_0.inc | 177 int incx, void *devicePtr, 183 return func_ptr(n, elemSize, x, incx, devicePtr, incy); 187 int incx, void *y, int incy) { 192 return func_ptr(n, elemSize, x, incx, y, incy); 216 const void *hostPtr, int incx, 223 return func_ptr(n, elemSize, hostPtr, incx, devicePtr, incy, stream); 228 int incx, void *hostPtr, 235 return func_ptr(n, elemSize, devicePtr, incx, hostPtr, incy, stream); 269 int incx, void *result, 277 return func_ptr(handle, n, x, xType, incx, result, resultType, executionType); [all …]
|
D | cublas_10_2.inc | 138 int incx, void *devicePtr, 144 return func_ptr(n, elemSize, x, incx, devicePtr, incy); 148 int incx, void *y, int incy) { 153 return func_ptr(n, elemSize, x, incx, y, incy); 177 const void *hostPtr, int incx, 184 return func_ptr(n, elemSize, hostPtr, incx, devicePtr, incy, stream); 189 int incx, void *hostPtr, 196 return func_ptr(n, elemSize, devicePtr, incx, hostPtr, incy, stream); 230 int incx, void *result, 238 return func_ptr(handle, n, x, xType, incx, result, resultType, executionType); [all …]
|
D | cublas_10_1.inc | 138 int incx, void *devicePtr, 144 return func_ptr(n, elemSize, x, incx, devicePtr, incy); 148 int incx, void *y, int incy) { 153 return func_ptr(n, elemSize, x, incx, y, incy); 177 const void *hostPtr, int incx, 184 return func_ptr(n, elemSize, hostPtr, incx, devicePtr, incy, stream); 189 int incx, void *hostPtr, 196 return func_ptr(n, elemSize, devicePtr, incx, hostPtr, incy, stream); 230 int incx, void *result, 238 return func_ptr(handle, n, x, xType, incx, result, resultType, executionType); [all …]
|
D | cublas_10_0.inc | 131 int incx, void *devicePtr, 137 return func_ptr(n, elemSize, x, incx, devicePtr, incy); 141 int incx, void *y, int incy) { 146 return func_ptr(n, elemSize, x, incx, y, incy); 170 const void *hostPtr, int incx, 177 return func_ptr(n, elemSize, hostPtr, incx, devicePtr, incy, stream); 182 int incx, void *hostPtr, 189 return func_ptr(n, elemSize, devicePtr, incx, hostPtr, incy, stream); 223 int incx, void *result, 231 return func_ptr(handle, n, x, xType, incx, result, resultType, executionType); [all …]
|
/external/tensorflow/tensorflow/compiler/xla/stream_executor/ |
D | blas.h | 217 const DeviceMemory<float> &x, int incx, 220 const DeviceMemory<double> &x, int incx, 224 const DeviceMemory<std::complex<float>> &x, int incx, 228 const DeviceMemory<std::complex<double>> &x, int incx, 233 const DeviceMemory<float> &x, int incx, 236 const DeviceMemory<double> &x, int incx, 239 const DeviceMemory<std::complex<float>> &x, int incx, 242 const DeviceMemory<std::complex<double>> &x, int incx, 247 DeviceMemory<float> *x, int incx) = 0; 249 DeviceMemory<double> *x, int incx) = 0; [all …]
|