Lines Matching refs:lda
15 int *k, CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *a, int *lda, in F77_cgemm() argument
32 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_cgemm()
33 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_cgemm()
41 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_cgemm()
42 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_cgemm()
84 cblas_cgemm( CblasColMajor, transa, transb, *m, *n, *k, alpha, a, *lda, in F77_cgemm()
87 cblas_cgemm( UNDEFINED, transa, transb, *m, *n, *k, alpha, a, *lda, in F77_cgemm()
91 CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *a, int *lda, in F77_chemm() argument
109 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_chemm()
110 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_chemm()
118 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_chemm()
119 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_chemm()
148 cblas_chemm( CblasColMajor, side, uplo, *m, *n, alpha, a, *lda, b, *ldb, in F77_chemm()
151 cblas_chemm( UNDEFINED, side, uplo, *m, *n, alpha, a, *lda, b, *ldb, in F77_chemm()
155 CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *a, int *lda, in F77_csymm() argument
173 A[i*LDA+j]=a[j*(*lda)+i]; in F77_csymm()
180 A[i*LDA+j]=a[j*(*lda)+i]; in F77_csymm()
202 cblas_csymm( CblasColMajor, side, uplo, *m, *n, alpha, a, *lda, b, *ldb, in F77_csymm()
205 cblas_csymm( UNDEFINED, side, uplo, *m, *n, alpha, a, *lda, b, *ldb, in F77_csymm()
210 float *alpha, CBLAS_TEST_COMPLEX *a, int *lda, in F77_cherk() argument
227 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_cherk()
228 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_cherk()
236 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_cherk()
237 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_cherk()
258 cblas_cherk(CblasColMajor, uplo, trans, *n, *k, *alpha, a, *lda, *beta, in F77_cherk()
261 cblas_cherk(UNDEFINED, uplo, trans, *n, *k, *alpha, a, *lda, *beta, in F77_cherk()
266 CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *a, int *lda, in F77_csyrk() argument
283 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_csyrk()
284 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_csyrk()
292 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_csyrk()
293 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_csyrk()
314 cblas_csyrk(CblasColMajor, uplo, trans, *n, *k, alpha, a, *lda, beta, in F77_csyrk()
317 cblas_csyrk(UNDEFINED, uplo, trans, *n, *k, alpha, a, *lda, beta, in F77_csyrk()
321 CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *a, int *lda, in F77_cher2k() argument
340 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_cher2k()
341 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_cher2k()
353 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_cher2k()
354 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_cher2k()
378 cblas_cher2k(CblasColMajor, uplo, trans, *n, *k, alpha, a, *lda, in F77_cher2k()
381 cblas_cher2k(UNDEFINED, uplo, trans, *n, *k, alpha, a, *lda, in F77_cher2k()
385 CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *a, int *lda, in F77_csyr2k() argument
404 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_csyr2k()
405 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_csyr2k()
417 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_csyr2k()
418 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_csyr2k()
442 cblas_csyr2k(CblasColMajor, uplo, trans, *n, *k, alpha, a, *lda, in F77_csyr2k()
445 cblas_csyr2k(UNDEFINED, uplo, trans, *n, *k, alpha, a, *lda, in F77_csyr2k()
450 int *lda, CBLAS_TEST_COMPLEX *b, int *ldb) { in F77_ctrmm() argument
469 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_ctrmm()
470 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_ctrmm()
478 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_ctrmm()
479 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_ctrmm()
501 a, *lda, b, *ldb); in F77_ctrmm()
504 a, *lda, b, *ldb); in F77_ctrmm()
509 int *lda, CBLAS_TEST_COMPLEX *b, int *ldb) { in F77_ctrsm() argument
528 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_ctrsm()
529 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_ctrsm()
537 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_ctrsm()
538 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_ctrsm()
560 a, *lda, b, *ldb); in F77_ctrsm()
563 a, *lda, b, *ldb); in F77_ctrsm()