Lines Matching refs:LDA
20 int i,j,LDA, LDB, LDC; in F77_zgemm() local
28 LDA = *k+1; in F77_zgemm()
29 A=(CBLAS_TEST_ZOMPLEX*)malloc((*m)*LDA*sizeof(CBLAS_TEST_ZOMPLEX)); in F77_zgemm()
32 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_zgemm()
33 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_zgemm()
37 LDA = *m+1; in F77_zgemm()
38 A=(CBLAS_TEST_ZOMPLEX* )malloc(LDA*(*k)*sizeof(CBLAS_TEST_ZOMPLEX)); in F77_zgemm()
41 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_zgemm()
42 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_zgemm()
72 cblas_zgemm( CblasRowMajor, transa, transb, *m, *n, *k, alpha, A, LDA, in F77_zgemm()
96 int i,j,LDA, LDB, LDC; in F77_zhemm() local
105 LDA = *m+1; in F77_zhemm()
106 A= (CBLAS_TEST_ZOMPLEX* )malloc((*m)*LDA*sizeof(CBLAS_TEST_ZOMPLEX)); in F77_zhemm()
109 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_zhemm()
110 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_zhemm()
114 LDA = *n+1; in F77_zhemm()
115 A=(CBLAS_TEST_ZOMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_ZOMPLEX ) ); in F77_zhemm()
118 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_zhemm()
119 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_zhemm()
136 cblas_zhemm( CblasRowMajor, side, uplo, *m, *n, alpha, A, LDA, B, LDB, in F77_zhemm()
160 int i,j,LDA, LDB, LDC; in F77_zsymm() local
169 LDA = *m+1; in F77_zsymm()
170 A=(CBLAS_TEST_ZOMPLEX* )malloc((*m)*LDA*sizeof(CBLAS_TEST_ZOMPLEX)); in F77_zsymm()
173 A[i*LDA+j]=a[j*(*lda)+i]; in F77_zsymm()
176 LDA = *n+1; in F77_zsymm()
177 A=(CBLAS_TEST_ZOMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_ZOMPLEX ) ); in F77_zsymm()
180 A[i*LDA+j]=a[j*(*lda)+i]; in F77_zsymm()
192 cblas_zsymm( CblasRowMajor, side, uplo, *m, *n, alpha, A, LDA, B, LDB, in F77_zsymm()
213 int i,j,LDA,LDC; in F77_zherk() local
223 LDA = *k+1; in F77_zherk()
224 A=(CBLAS_TEST_ZOMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_ZOMPLEX ) ); in F77_zherk()
227 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_zherk()
228 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_zherk()
232 LDA = *n+1; in F77_zherk()
233 A=(CBLAS_TEST_ZOMPLEX* )malloc((*k)*LDA*sizeof(CBLAS_TEST_ZOMPLEX ) ); in F77_zherk()
236 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_zherk()
237 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_zherk()
247 cblas_zherk(CblasRowMajor, uplo, trans, *n, *k, *alpha, A, LDA, *beta, in F77_zherk()
269 int i,j,LDA,LDC; in F77_zsyrk() local
279 LDA = *k+1; in F77_zsyrk()
280 A=(CBLAS_TEST_ZOMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_ZOMPLEX)); in F77_zsyrk()
283 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_zsyrk()
284 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_zsyrk()
288 LDA = *n+1; in F77_zsyrk()
289 A=(CBLAS_TEST_ZOMPLEX* )malloc((*k)*LDA*sizeof(CBLAS_TEST_ZOMPLEX ) ); in F77_zsyrk()
292 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_zsyrk()
293 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_zsyrk()
303 cblas_zsyrk(CblasRowMajor, uplo, trans, *n, *k, alpha, A, LDA, beta, in F77_zsyrk()
324 int i,j,LDA,LDB,LDC; in F77_zher2k() local
334 LDA = *k+1; in F77_zher2k()
336 A=(CBLAS_TEST_ZOMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_ZOMPLEX )); in F77_zher2k()
340 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_zher2k()
341 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_zher2k()
347 LDA = *n+1; in F77_zher2k()
349 A=(CBLAS_TEST_ZOMPLEX* )malloc( LDA*(*k)*sizeof(CBLAS_TEST_ZOMPLEX ) ); in F77_zher2k()
353 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_zher2k()
354 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_zher2k()
366 cblas_zher2k(CblasRowMajor, uplo, trans, *n, *k, alpha, A, LDA, in F77_zher2k()
388 int i,j,LDA,LDB,LDC; in F77_zsyr2k() local
398 LDA = *k+1; in F77_zsyr2k()
400 A=(CBLAS_TEST_ZOMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_ZOMPLEX)); in F77_zsyr2k()
404 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_zsyr2k()
405 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_zsyr2k()
411 LDA = *n+1; in F77_zsyr2k()
413 A=(CBLAS_TEST_ZOMPLEX* )malloc(LDA*(*k)*sizeof(CBLAS_TEST_ZOMPLEX)); in F77_zsyr2k()
417 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_zsyr2k()
418 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_zsyr2k()
430 cblas_zsyr2k(CblasRowMajor, uplo, trans, *n, *k, alpha, A, LDA, in F77_zsyr2k()
451 int i,j,LDA,LDB; in F77_ztrmm() local
465 LDA = *m+1; in F77_ztrmm()
466 A=(CBLAS_TEST_ZOMPLEX* )malloc((*m)*LDA*sizeof(CBLAS_TEST_ZOMPLEX)); in F77_ztrmm()
469 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_ztrmm()
470 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_ztrmm()
474 LDA = *n+1; in F77_ztrmm()
475 A=(CBLAS_TEST_ZOMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_ZOMPLEX)); in F77_ztrmm()
478 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_ztrmm()
479 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_ztrmm()
490 A, LDA, B, LDB ); in F77_ztrmm()
510 int i,j,LDA,LDB; in F77_ztrsm() local
524 LDA = *m+1; in F77_ztrsm()
525 A=(CBLAS_TEST_ZOMPLEX* )malloc( (*m)*LDA*sizeof(CBLAS_TEST_ZOMPLEX ) ); in F77_ztrsm()
528 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_ztrsm()
529 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_ztrsm()
533 LDA = *n+1; in F77_ztrsm()
534 A=(CBLAS_TEST_ZOMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_ZOMPLEX)); in F77_ztrsm()
537 A[i*LDA+j].real=a[j*(*lda)+i].real; in F77_ztrsm()
538 A[i*LDA+j].imag=a[j*(*lda)+i].imag; in F77_ztrsm()
549 A, LDA, B, LDB ); in F77_ztrsm()