/external/eigen/blas/ |
H A D | level1_real_impl.h | 14 RealScalar EIGEN_BLAS_FUNC(asum)(int *n, RealScalar *px, int *incx) argument 16 // std::cerr << "_asum " << *n << " " << *incx << "\n"; 22 if(*incx==1) return vector(x,*n).cwiseAbs().sum(); 23 else return vector(x,*n,std::abs(*incx)).cwiseAbs().sum(); 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< 46 nrm2(int *n, RealScalar *px, int *incx) argument 57 rot(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar *pc, RealScalar *ps) argument [all...] |
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) [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).reverse() += alpha * vector(x,*n,-*incx) 29 copy(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy) argument 54 amax_(int *n, RealScalar *px, int *incx) argument 65 amin_(int *n, RealScalar *px, int *incx) argument 139 scal(int *n, RealScalar *palpha, RealScalar *px, int *incx) argument 152 swap(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy) argument [all...] |
H A D | level1_cplx_impl.h | 28 RealScalar EIGEN_CAT(EIGEN_CAT(REAL_SCALAR_SUFFIX,SCALAR_SUFFIX),asum_)(int *n, RealScalar *px, int *incx) argument 30 // std::cerr << "__asum " << *n << " " << *incx << "\n"; 35 if(*incx==1) return vector(x,*n).unaryExpr<scalar_norm1_op>().sum(); 36 else return 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* 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< 59 dotuw(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar* pres) argument 77 nrm2_(int *n, RealScalar *px, int *incx) argument 90 rot_(int *n, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar *pc, RealScalar *ps) argument 113 scal_(int *n, RealScalar *palpha, RealScalar *px, int *incx) 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 | common.h | 121 T* get_compact_vector(T* x, int n, int incx) argument 123 if(incx==1) 127 if(incx<0) vector(ret,n) = vector(x,n,-incx).reverse(); 128 else vector(ret,n) = vector(x,n, incx); 133 T* copy_back(T* x_cpy, T* x, int n, int incx) argument 138 if(incx<0) vector(x,n,-incx).reverse() = vector(x_cpy,n); 139 else vector(x,n, incx) = vector(x_cpy,n);
|
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 41 else if(*incx==0) info = 7; 49 Scalar* actual_x = get_compact_vector(x,*n,*incx); 71 int EIGEN_BLAS_FUNC(syr)(char *uplo, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealScalar *pc, int *ldc) argument 110 else if(*incx==0) info = 5; 118 Scalar* x_cpy = get_compact_vector(x,*n,*incx); 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 171 else if(*incx==0) info = 5; 180 Scalar* x_cpy = get_compact_vector(x,*n,*incx); 208 // RealScalar *x, int *incx, RealScala 234 spr(char *uplo, int *n, Scalar *palpha, Scalar *px, int *incx, Scalar *pap) argument 285 spr2(char *uplo, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar *pap) 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_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 47 else if(*incx==0) info = 7; 55 Scalar* actual_x = get_compact_vector(x,*n,*incx); 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) 111 int EIGEN_BLAS_FUNC(hpr)(char *uplo, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealScalar *pap) argument 135 else if(*incx==0) info = 5; 142 Scalar* x_cpy = get_compact_vector(x, *n, *incx); 162 int EIGEN_BLAS_FUNC(hpr2)(char *uplo, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar *pap) argument 187 else if(*incx 217 her(char *uplo, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealScalar *pa, int *lda) argument 271 her2(char *uplo, int *n, RealScalar *palpha, RealScalar *px, int *incx, RealScalar *py, int *incy, RealScalar *pa, int *lda) 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...] |
/external/eigen/blas/f2c/ |
H A D | complexdots.c | 22 *incx, complex *cy, integer *incy) 33 cdotcw_(n, &cx[1], incx, &cy[1], incy, &res); 38 *incx, complex *cy, integer *incy) 49 cdotuw_(n, &cx[1], incx, &cy[1], incy, &res); 53 doublecomplex zdotc_(integer *n, doublecomplex *cx, integer *incx, argument 65 zdotcw_(n, &cx[1], incx, &cy[1], incy, &res); 69 doublecomplex zdotu_(integer *n, doublecomplex *cx, integer *incx, argument 81 zdotuw_(n, &cx[1], incx, &cy[1], incy, &res); 21 cdotc_(integer *n, complex *cx, integer *incx, complex *cy, integer *incy) argument 37 cdotu_(integer *n, complex *cx, integer *incx, complex *cy, integer *incy) argument
|
H A D | dtbmv.c | 16 integer *k, doublereal *a, integer *lda, doublereal *x, integer *incx, 203 } else if (*incx == 0) { 222 if (*incx <= 0) { 223 kx = 1 - (*n - 1) * *incx; 224 } else if (*incx != 1) { 237 if (*incx == 1) { 269 ix += *incx; 276 jx += *incx; 278 kx += *incx; 284 if (*incx 15 dtbmv_(char *uplo, char *trans, char *diag, integer *n, integer *k, doublereal *a, integer *lda, doublereal *x, integer *incx, ftnlen uplo_len, ftnlen trans_len, ftnlen diag_len) argument [all...] |
H A D | drotm.c | 15 /* Subroutine */ int drotm_(integer *n, doublereal *dx, integer *incx, argument 99 if (! (*incx == *incy && *incx > 0)) { 103 nsteps = *n * *incx; 115 i__2 = *incx; 128 i__1 = *incx; 143 i__2 = *incx; 155 if (*incx < 0) { 156 kx = (1 - *n) * *incx + 1; 178 kx += *incx; [all...] |
H A D | srotm.c | 15 /* Subroutine */ int srotm_(integer *n, real *sx, integer *incx, real *sy, argument 100 if (! (*incx == *incy && *incx > 0)) { 104 nsteps = *n * *incx; 116 i__2 = *incx; 129 i__1 = *incx; 144 i__2 = *incx; 156 if (*incx < 0) { 157 kx = (1 - *n) * *incx + 1; 179 kx += *incx; [all...] |
H A D | stbmv.c | 16 integer *k, real *a, integer *lda, real *x, integer *incx, ftnlen 203 } else if (*incx == 0) { 222 if (*incx <= 0) { 223 kx = 1 - (*n - 1) * *incx; 224 } else if (*incx != 1) { 237 if (*incx == 1) { 269 ix += *incx; 276 jx += *incx; 278 kx += *incx; 284 if (*incx 15 stbmv_(char *uplo, char *trans, char *diag, integer *n, integer *k, real *a, integer *lda, real *x, integer *incx, ftnlen uplo_len, ftnlen trans_len, ftnlen diag_len) argument [all...] |
H A D | dsbmv.c | 16 alpha, doublereal *a, integer *lda, doublereal *x, integer *incx, 186 } else if (*incx == 0) { 204 if (*incx > 0) { 207 kx = 1 - (*n - 1) * *incx; 262 if (*incx == 1 && *incy == 1) { 295 ix += *incx; 301 jx += *incx; 304 kx += *incx; 314 if (*incx == 1 && *incy == 1) { 347 ix += *incx; 15 dsbmv_(char *uplo, integer *n, integer *k, doublereal * alpha, doublereal *a, integer *lda, doublereal *x, integer *incx, doublereal *beta, doublereal *y, integer *incy, ftnlen uplo_len) argument [all...] |
H A D | ssbmv.c | 16 real *a, integer *lda, real *x, integer *incx, real *beta, real *y, 188 } else if (*incx == 0) { 206 if (*incx > 0) { 209 kx = 1 - (*n - 1) * *incx; 264 if (*incx == 1 && *incy == 1) { 297 ix += *incx; 303 jx += *incx; 306 kx += *incx; 316 if (*incx == 1 && *incy == 1) { 349 ix += *incx; 15 ssbmv_(char *uplo, integer *n, integer *k, real *alpha, real *a, integer *lda, real *x, integer *incx, real *beta, real *y, integer *incy, ftnlen uplo_len) argument [all...] |
H A D | dspmv.c | 16 doublereal *ap, doublereal *x, integer *incx, doublereal *beta, 145 } else if (*incx == 0) { 163 if (*incx > 0) { 166 kx = 1 - (*n - 1) * *incx; 221 if (*incx == 1 && *incy == 1) { 251 ix += *incx; 256 jx += *incx; 266 if (*incx == 1 && *incy == 1) { 296 ix += *incx; 303 jx += *incx; 15 dspmv_(char *uplo, integer *n, doublereal *alpha, doublereal *ap, doublereal *x, integer *incx, doublereal *beta, doublereal *y, integer *incy, ftnlen uplo_len) argument [all...] |
H A D | sspmv.c | 16 real *x, integer *incx, real *beta, real *y, integer *incy, ftnlen 145 } else if (*incx == 0) { 163 if (*incx > 0) { 166 kx = 1 - (*n - 1) * *incx; 221 if (*incx == 1 && *incy == 1) { 251 ix += *incx; 256 jx += *incx; 266 if (*incx == 1 && *incy == 1) { 296 ix += *incx; 303 jx += *incx; 15 sspmv_(char *uplo, integer *n, real *alpha, real *ap, real *x, integer *incx, real *beta, real *y, integer *incy, ftnlen uplo_len) argument [all...] |
/external/cblas/testing/ |
H A D | c_dblas2.c | 12 double *a, int *lda, double *x, int *incx, double *beta, 27 *m, *n, *alpha, A, LDA, x, *incx, *beta, y, *incy ); 32 *m, *n, *alpha, a, *lda, x, *incx, *beta, y, *incy ); 35 *m, *n, *alpha, a, *lda, x, *incx, *beta, y, *incy ); 38 void F77_dger(int *order, int *m, int *n, double *alpha, double *x, int *incx, argument 53 cblas_dger(CblasRowMajor, *m, *n, *alpha, x, *incx, y, *incy, A, LDA ); 60 cblas_dger( CblasColMajor, *m, *n, *alpha, x, *incx, y, *incy, a, *lda ); 64 int *n, double *a, int *lda, double *x, int *incx) { 81 cblas_dtrmv(CblasRowMajor, uplo, trans, diag, *n, A, LDA, x, *incx); 85 cblas_dtrmv(CblasColMajor, uplo, trans, diag, *n, a, *lda, x, *incx); 11 F77_dgemv(int *order, char *transp, int *m, int *n, double *alpha, double *a, int *lda, double *x, int *incx, double *beta, double *y, int *incy ) argument 63 F77_dtrmv(int *order, char *uplow, char *transp, char *diagn, int *n, double *a, int *lda, double *x, int *incx) argument 115 F77_dsymv(int *order, char *uplow, int *n, double *alpha, double *a, int *lda, double *x, int *incx, double *beta, double *y, int *incy) argument 139 F77_dsyr(int *order, char *uplow, int *n, double *alpha, double *x, int *incx, double *a, int *lda) argument 163 F77_dsyr2(int *order, char *uplow, int *n, double *alpha, double *x, int *incx, double *y, int *incy, double *a, int *lda) argument 187 F77_dgbmv(int *order, char *transp, int *m, int *n, int *kl, int *ku, double *alpha, double *a, int *lda, double *x, int *incx, double *beta, double *y, int *incy ) argument 225 F77_dtbmv(int *order, char *uplow, char *transp, char *diagn, int *n, int *k, double *a, int *lda, double *x, int *incx) argument 271 F77_dtbsv(int *order, char *uplow, char *transp, char *diagn, int *n, int *k, double *a, int *lda, double *x, int *incx) argument 317 F77_dsbmv(int *order, char *uplow, int *n, int *k, double *alpha, double *a, int *lda, double *x, int *incx, double *beta, double *y, int *incy) argument 362 F77_dspmv(int *order, char *uplow, int *n, double *alpha, double *ap, double *x, int *incx, double *beta, double *y, int *incy) argument 400 F77_dtpmv(int *order, char *uplow, char *transp, char *diagn, int *n, double *ap, double *x, int *incx) argument 440 F77_dtpsv(int *order, char *uplow, char *transp, char *diagn, int *n, double *ap, double *x, int *incx) argument 481 F77_dspr(int *order, char *uplow, int *n, double *alpha, double *x, int *incx, double *ap ) argument 533 F77_dspr2(int *order, char *uplow, int *n, double *alpha, double *x, int *incx, double *y, int *incy, double *ap ) argument [all...] |
H A D | c_sblas2.c | 12 float *a, int *lda, float *x, int *incx, float *beta, 27 *m, *n, *alpha, A, LDA, x, *incx, *beta, y, *incy ); 32 *m, *n, *alpha, a, *lda, x, *incx, *beta, y, *incy ); 35 *m, *n, *alpha, a, *lda, x, *incx, *beta, y, *incy ); 38 void F77_sger(int *order, int *m, int *n, float *alpha, float *x, int *incx, argument 53 cblas_sger(CblasRowMajor, *m, *n, *alpha, x, *incx, y, *incy, A, LDA ); 60 cblas_sger( CblasColMajor, *m, *n, *alpha, x, *incx, y, *incy, a, *lda ); 64 int *n, float *a, int *lda, float *x, int *incx) { 81 cblas_strmv(CblasRowMajor, uplo, trans, diag, *n, A, LDA, x, *incx); 85 cblas_strmv(CblasColMajor, uplo, trans, diag, *n, a, *lda, x, *incx); 11 F77_sgemv(int *order, char *transp, int *m, int *n, float *alpha, float *a, int *lda, float *x, int *incx, float *beta, float *y, int *incy ) argument 63 F77_strmv(int *order, char *uplow, char *transp, char *diagn, int *n, float *a, int *lda, float *x, int *incx) argument 115 F77_ssymv(int *order, char *uplow, int *n, float *alpha, float *a, int *lda, float *x, int *incx, float *beta, float *y, int *incy) argument 139 F77_ssyr(int *order, char *uplow, int *n, float *alpha, float *x, int *incx, float *a, int *lda) argument 163 F77_ssyr2(int *order, char *uplow, int *n, float *alpha, float *x, int *incx, float *y, int *incy, float *a, int *lda) argument 187 F77_sgbmv(int *order, char *transp, int *m, int *n, int *kl, int *ku, float *alpha, float *a, int *lda, float *x, int *incx, float *beta, float *y, int *incy ) argument 225 F77_stbmv(int *order, char *uplow, char *transp, char *diagn, int *n, int *k, float *a, int *lda, float *x, int *incx) argument 271 F77_stbsv(int *order, char *uplow, char *transp, char *diagn, int *n, int *k, float *a, int *lda, float *x, int *incx) argument 317 F77_ssbmv(int *order, char *uplow, int *n, int *k, float *alpha, float *a, int *lda, float *x, int *incx, float *beta, float *y, int *incy) argument 362 F77_sspmv(int *order, char *uplow, int *n, float *alpha, float *ap, float *x, int *incx, float *beta, float *y, int *incy) argument 399 F77_stpmv(int *order, char *uplow, char *transp, char *diagn, int *n, float *ap, float *x, int *incx) argument 438 F77_stpsv(int *order, char *uplow, char *transp, char *diagn, int *n, float *ap, float *x, int *incx) argument 478 F77_sspr(int *order, char *uplow, int *n, float *alpha, float *x, int *incx, float *ap ) argument 529 F77_sspr2(int *order, char *uplow, int *n, float *alpha, float *x, int *incx, float *y, int *incy, float *ap ) argument [all...] |
H A D | c_cblas2.c | 13 CBLAS_TEST_COMPLEX *a, int *lda, const void *x, int *incx, 29 cblas_cgemv( CblasRowMajor, trans, *m, *n, alpha, A, LDA, x, *incx, 35 *m, *n, alpha, a, *lda, x, *incx, beta, y, *incy ); 38 *m, *n, alpha, a, *lda, x, *incx, beta, y, *incy ); 43 CBLAS_TEST_COMPLEX *x, int *incx, 77 *incx, beta, y, *incy ); 82 *incx, beta, y, *incy ); 85 *incx, beta, y, *incy ); 89 CBLAS_TEST_COMPLEX *x, int *incx, CBLAS_TEST_COMPLEX *y, int *incy, 103 cblas_cgeru( CblasRowMajor, *m, *n, alpha, x, *incx, 11 F77_cgemv(int *order, char *transp, int *m, int *n, const void *alpha, CBLAS_TEST_COMPLEX *a, int *lda, const void *x, int *incx, const void *beta, void *y, int *incy) argument 41 F77_cgbmv(int *order, char *transp, int *m, int *n, int *kl, int *ku, CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *a, int *lda, CBLAS_TEST_COMPLEX *x, int *incx, CBLAS_TEST_COMPLEX *beta, CBLAS_TEST_COMPLEX *y, int *incy) argument 88 F77_cgeru(int *order, int *m, int *n, CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *x, int *incx, CBLAS_TEST_COMPLEX *y, int *incy, CBLAS_TEST_COMPLEX *a, int *lda) argument 117 F77_cgerc(int *order, int *m, int *n, CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *x, int *incx, CBLAS_TEST_COMPLEX *y, int *incy, CBLAS_TEST_COMPLEX *a, int *lda) argument 145 F77_chemv(int *order, char *uplow, int *n, CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *a, int *lda, CBLAS_TEST_COMPLEX *x, int *incx, CBLAS_TEST_COMPLEX *beta, CBLAS_TEST_COMPLEX *y, int *incy) argument 175 F77_chbmv(int *order, char *uplow, int *n, int *k, CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *a, int *lda, CBLAS_TEST_COMPLEX *x, int *incx, CBLAS_TEST_COMPLEX *beta, CBLAS_TEST_COMPLEX *y, int *incy) argument 239 F77_chpmv(int *order, char *uplow, int *n, CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *ap, CBLAS_TEST_COMPLEX *x, int *incx, CBLAS_TEST_COMPLEX *beta, CBLAS_TEST_COMPLEX *y, int *incy) argument 295 F77_ctbmv(int *order, char *uplow, char *transp, char *diagn, int *n, int *k, CBLAS_TEST_COMPLEX *a, int *lda, CBLAS_TEST_COMPLEX *x, int *incx) argument 358 F77_ctbsv(int *order, char *uplow, char *transp, char *diagn, int *n, int *k, CBLAS_TEST_COMPLEX *a, int *lda, CBLAS_TEST_COMPLEX *x, int *incx) argument 422 F77_ctpmv(int *order, char *uplow, char *transp, char *diagn, int *n, CBLAS_TEST_COMPLEX *ap, CBLAS_TEST_COMPLEX *x, int *incx) argument 477 F77_ctpsv(int *order, char *uplow, char *transp, char *diagn, int *n, CBLAS_TEST_COMPLEX *ap, CBLAS_TEST_COMPLEX *x, int *incx) argument 532 F77_ctrmv(int *order, char *uplow, char *transp, char *diagn, int *n, CBLAS_TEST_COMPLEX *a, int *lda, CBLAS_TEST_COMPLEX *x, int *incx) argument 561 F77_ctrsv(int *order, char *uplow, char *transp, char *diagn, int *n, CBLAS_TEST_COMPLEX *a, int *lda, CBLAS_TEST_COMPLEX *x, int *incx) argument 591 F77_chpr(int *order, char *uplow, int *n, float *alpha, CBLAS_TEST_COMPLEX *x, int *incx, CBLAS_TEST_COMPLEX *ap) argument 666 F77_chpr2(int *order, char *uplow, int *n, CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *x, int *incx, CBLAS_TEST_COMPLEX *y, int *incy, CBLAS_TEST_COMPLEX *ap) argument 743 F77_cher(int *order, char *uplow, int *n, float *alpha, CBLAS_TEST_COMPLEX *x, int *incx, CBLAS_TEST_COMPLEX *a, int *lda) argument 775 F77_cher2(int *order, char *uplow, int *n, CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *x, int *incx, CBLAS_TEST_COMPLEX *y, int *incy, CBLAS_TEST_COMPLEX *a, int *lda) argument [all...] |
H A D | c_zblas2.c | 13 CBLAS_TEST_ZOMPLEX *a, int *lda, const void *x, int *incx, 29 cblas_zgemv( CblasRowMajor, trans, *m, *n, alpha, A, LDA, x, *incx, 35 *m, *n, alpha, a, *lda, x, *incx, beta, y, *incy ); 38 *m, *n, alpha, a, *lda, x, *incx, beta, y, *incy ); 43 CBLAS_TEST_ZOMPLEX *x, int *incx, 77 *incx, beta, y, *incy ); 82 *incx, beta, y, *incy ); 85 *incx, beta, y, *incy ); 89 CBLAS_TEST_ZOMPLEX *x, int *incx, CBLAS_TEST_ZOMPLEX *y, int *incy, 103 cblas_zgeru( CblasRowMajor, *m, *n, alpha, x, *incx, 11 F77_zgemv(int *order, char *transp, int *m, int *n, const void *alpha, CBLAS_TEST_ZOMPLEX *a, int *lda, const void *x, int *incx, const void *beta, void *y, int *incy) argument 41 F77_zgbmv(int *order, char *transp, int *m, int *n, int *kl, int *ku, CBLAS_TEST_ZOMPLEX *alpha, CBLAS_TEST_ZOMPLEX *a, int *lda, CBLAS_TEST_ZOMPLEX *x, int *incx, CBLAS_TEST_ZOMPLEX *beta, CBLAS_TEST_ZOMPLEX *y, int *incy) argument 88 F77_zgeru(int *order, int *m, int *n, CBLAS_TEST_ZOMPLEX *alpha, CBLAS_TEST_ZOMPLEX *x, int *incx, CBLAS_TEST_ZOMPLEX *y, int *incy, CBLAS_TEST_ZOMPLEX *a, int *lda) argument 117 F77_zgerc(int *order, int *m, int *n, CBLAS_TEST_ZOMPLEX *alpha, CBLAS_TEST_ZOMPLEX *x, int *incx, CBLAS_TEST_ZOMPLEX *y, int *incy, CBLAS_TEST_ZOMPLEX *a, int *lda) argument 145 F77_zhemv(int *order, char *uplow, int *n, CBLAS_TEST_ZOMPLEX *alpha, CBLAS_TEST_ZOMPLEX *a, int *lda, CBLAS_TEST_ZOMPLEX *x, int *incx, CBLAS_TEST_ZOMPLEX *beta, CBLAS_TEST_ZOMPLEX *y, int *incy) argument 175 F77_zhbmv(int *order, char *uplow, int *n, int *k, CBLAS_TEST_ZOMPLEX *alpha, CBLAS_TEST_ZOMPLEX *a, int *lda, CBLAS_TEST_ZOMPLEX *x, int *incx, CBLAS_TEST_ZOMPLEX *beta, CBLAS_TEST_ZOMPLEX *y, int *incy) argument 239 F77_zhpmv(int *order, char *uplow, int *n, CBLAS_TEST_ZOMPLEX *alpha, CBLAS_TEST_ZOMPLEX *ap, CBLAS_TEST_ZOMPLEX *x, int *incx, CBLAS_TEST_ZOMPLEX *beta, CBLAS_TEST_ZOMPLEX *y, int *incy) argument 295 F77_ztbmv(int *order, char *uplow, char *transp, char *diagn, int *n, int *k, CBLAS_TEST_ZOMPLEX *a, int *lda, CBLAS_TEST_ZOMPLEX *x, int *incx) argument 358 F77_ztbsv(int *order, char *uplow, char *transp, char *diagn, int *n, int *k, CBLAS_TEST_ZOMPLEX *a, int *lda, CBLAS_TEST_ZOMPLEX *x, int *incx) argument 422 F77_ztpmv(int *order, char *uplow, char *transp, char *diagn, int *n, CBLAS_TEST_ZOMPLEX *ap, CBLAS_TEST_ZOMPLEX *x, int *incx) argument 477 F77_ztpsv(int *order, char *uplow, char *transp, char *diagn, int *n, CBLAS_TEST_ZOMPLEX *ap, CBLAS_TEST_ZOMPLEX *x, int *incx) argument 532 F77_ztrmv(int *order, char *uplow, char *transp, char *diagn, int *n, CBLAS_TEST_ZOMPLEX *a, int *lda, CBLAS_TEST_ZOMPLEX *x, int *incx) argument 561 F77_ztrsv(int *order, char *uplow, char *transp, char *diagn, int *n, CBLAS_TEST_ZOMPLEX *a, int *lda, CBLAS_TEST_ZOMPLEX *x, int *incx) argument 591 F77_zhpr(int *order, char *uplow, int *n, double *alpha, CBLAS_TEST_ZOMPLEX *x, int *incx, CBLAS_TEST_ZOMPLEX *ap) argument 666 F77_zhpr2(int *order, char *uplow, int *n, CBLAS_TEST_ZOMPLEX *alpha, CBLAS_TEST_ZOMPLEX *x, int *incx, CBLAS_TEST_ZOMPLEX *y, int *incy, CBLAS_TEST_ZOMPLEX *ap) argument 743 F77_zher(int *order, char *uplow, int *n, double *alpha, CBLAS_TEST_ZOMPLEX *x, int *incx, CBLAS_TEST_ZOMPLEX *a, int *lda) argument 775 F77_zher2(int *order, char *uplow, int *n, CBLAS_TEST_ZOMPLEX *alpha, CBLAS_TEST_ZOMPLEX *x, int *incx, CBLAS_TEST_ZOMPLEX *y, int *incy, CBLAS_TEST_ZOMPLEX *a, int *lda) argument [all...] |
/external/cblas/examples/ |
H A D | cblas_example1.c | 14 int m, n, lda, incx, incy, i; local 22 incx = 1; 60 cblas_dgemv( order, transa, m, n, alpha, a, lda, x, incx, beta,
|
/external/cblas/src/ |
H A D | cblas_cher.c | 28 #define F77_incX incx 30 int n, i, tincx, incx=incX; local 98 incx = 1;
|
H A D | cblas_chpr.c | 27 #define F77_incX incx 29 int n, i, tincx, incx=incX; local 96 incx = 1;
|
H A D | cblas_zher.c | 28 #define F77_incX incx 30 int n, i, tincx, incx=incX; local 98 incx = 1;
|