/external/eigen/blas/ |
H A D | double.cpp | 22 double BLASFUNC(dsdot)(int* n, float* x, int* incx, float* y, int* incy) argument 26 if(*incx==1 && *incy==1) return (vector(x,*n).cast<double>().cwiseProduct(vector(y,*n).cast<double>())).sum(); 27 else if(*incx>0 && *incy>0) return (vector(x,*n,*incx).cast<double>().cwiseProduct(vector(y,*n,*incy).cast<double>())).sum(); 28 else if(*incx<0 && *incy>0) return (vector(x,*n,-*incx).reverse().cast<double>().cwiseProduct(vector(y,*n,*incy).cast<double>())).sum(); 29 else if(*incx>0 && *incy<0) return (vector(x,*n,*incx).cast<double>().cwiseProduct(vector(y,*n,-*incy).reverse().cast<double>())).sum(); 30 else if(*incx<0 && *incy<0) return (vector(x,*n,-*incx).reverse().cast<double>().cwiseProduct(vector(y,*n,-*incy) [all...] |
H A D | level1_real_impl.h | 27 Scalar EIGEN_BLAS_FUNC(dot)(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy) argument 29 // std::cerr << "_dot " << *n << " " << *incx << " " << *incy << "\n"; 36 if(*incx==1 && *incy==1) return (vector(x,*n).cwiseProduct(vector(y,*n))).sum(); 37 else if(*incx>0 && *incy>0) return (vector(x,*n,*incx).cwiseProduct(vector(y,*n,*incy))).sum(); 38 else if(*incx<0 && *incy>0) return (vector(x,*n,-*incx).reverse().cwiseProduct(vector(y,*n,*incy))).sum(); 39 else if(*incx>0 && *incy<0) return (vector(x,*n,*incx).cwiseProduct(vector(y,*n,-*incy).reverse())).sum(); 40 else if(*incx<0 && *incy< 57 rot(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar *pc, RealScalar *ps) argument [all...] |
H A D | single.cpp | 21 float BLASFUNC(sdsdot)(int* n, float* alpha, float* x, int* incx, float* y, int* incy) argument 22 { return *alpha + BLASFUNC(dsdot)(n, x, incx, y, incy); }
|
H A D | level1_cplx_impl.h | 40 int EIGEN_BLAS_FUNC(dotcw)(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar* pres) argument 42 // std::cerr << "_dotc " << *n << " " << *incx << " " << *incy << "\n"; 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< 59 dotuw(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar* pres) argument 90 rot_(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar *pc, RealScalar *ps) argument [all...] |
H A D | level1_impl.h | 12 int EIGEN_BLAS_FUNC(axpy)(int *n, RealScalar *palpha, RealScalar *px, int *incx, RealScalar *py, int *incy) argument 20 if(*incx==1 && *incy==1) vector(y,*n) += alpha * vector(x,*n); 21 else if(*incx>0 && *incy>0) vector(y,*n,*incy) += alpha * vector(x,*n,*incx); 22 else if(*incx>0 && *incy<0) vector(y,*n,-*incy).reverse() += alpha * vector(x,*n,*incx); 23 else if(*incx<0 && *incy>0) vector(y,*n,*incy) += alpha * vector(x,*n,-*incx).reverse(); 24 else if(*incx<0 && *incy<0) vector(y,*n,-*incy) 29 copy(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy) argument 152 swap(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy) argument [all...] |
H A D | level2_cplx_impl.h | 19 int EIGEN_BLAS_FUNC(hemv)(char *uplo, int *n, RealScalar *palpha, RealScalar *pa, int *lda, RealScalar *px, int *incx, RealScalar *pbeta, RealScalar *py, int *incy) argument 48 else if(*incy==0) info = 10; 56 Scalar* actual_y = get_compact_vector(y,*n,*incy); 74 if(actual_y!=y) delete[] copy_back(actual_y,y,*n,*incy); 87 // RealScalar *x, int *incx, RealScalar *beta, RealScalar *y, int *incy) 99 // int EIGEN_BLAS_FUNC(hpmv)(char *uplo, int *n, RealScalar *alpha, RealScalar *ap, RealScalar *x, int *incx, RealScalar *beta, RealScalar *y, int *incy) 162 int EIGEN_BLAS_FUNC(hpr2)(char *uplo, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar *pap) argument 188 else if(*incy==0) info = 7; 196 Scalar* y_cpy = get_compact_vector(y, *n, *incy); 271 int EIGEN_BLAS_FUNC(her2)(char *uplo, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScala argument 329 geru(int *m, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar *pa, int *lda) argument 366 gerc(int *m, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar *pa, int *lda) argument [all...] |
H A D | level2_real_impl.h | 13 int EIGEN_BLAS_FUNC(symv) (char *uplo, int *n, RealScalar *palpha, RealScalar *pa, int *lda, RealScalar *px, int *incx, RealScalar *pbeta, RealScalar *py, int *incy) argument 42 else if(*incy==0) info = 10; 50 Scalar* actual_y = get_compact_vector(y,*n,*incy); 65 if(actual_y!=y) delete[] copy_back(actual_y,y,*n,*incy); 132 int EIGEN_BLAS_FUNC(syr2)(char *uplo, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar *pc, int *ldc) argument 172 else if(*incy==0) info = 7; 181 Scalar* y_cpy = get_compact_vector(y,*n,*incy); 208 // RealScalar *x, int *incx, RealScalar *beta, RealScalar *y, int *incy) 222 // int EIGEN_BLAS_FUNC(spmv)(char *uplo, int *n, RealScalar *alpha, RealScalar *ap, RealScalar *x, int *incx, RealScalar *beta, RealScalar *y, int *incy) 285 int EIGEN_BLAS_FUNC(spr2)(char *uplo, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScala argument 340 ger(int *m, int *n, Scalar *palpha, Scalar *px, int *incx, Scalar *py, int *incy, Scalar *pa, int *lda) argument [all...] |
H A D | level2_impl.h | 201 RealScalar *px, int *incx, RealScalar *pbeta, RealScalar *py, int *incy) 218 else if(*incy==0) info = 13; 231 Scalar* actual_y = get_compact_vector(y,actual_m,*incy); 257 if(actual_y!=y) delete[] copy_back(actual_y,y,actual_m,*incy); 315 if(actual_y!=y) delete[] copy_back(actual_y,y,actual_m,*incy); 200 gbmv(char *trans, int *m, int *n, int *kl, int *ku, RealScalar *palpha, RealScalar *pa, int *lda, RealScalar *px, int *incx, RealScalar *pbeta, RealScalar *py, int *incy) argument
|