Lines Matching refs:CBLAS_TEST_COMPLEX
15 int *k, CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *a, int *lda, in F77_cgemm()
16 CBLAS_TEST_COMPLEX *b, int *ldb, CBLAS_TEST_COMPLEX *beta, in F77_cgemm()
17 CBLAS_TEST_COMPLEX *c, int *ldc ) { in F77_cgemm()
19 CBLAS_TEST_COMPLEX *A, *B, *C; in F77_cgemm()
29 A=(CBLAS_TEST_COMPLEX*)malloc((*m)*LDA*sizeof(CBLAS_TEST_COMPLEX)); in F77_cgemm()
38 A=(CBLAS_TEST_COMPLEX* )malloc(LDA*(*k)*sizeof(CBLAS_TEST_COMPLEX)); in F77_cgemm()
48 B=(CBLAS_TEST_COMPLEX* )malloc((*k)*LDB*sizeof(CBLAS_TEST_COMPLEX) ); in F77_cgemm()
57 B=(CBLAS_TEST_COMPLEX* )malloc(LDB*(*n)*sizeof(CBLAS_TEST_COMPLEX)); in F77_cgemm()
66 C=(CBLAS_TEST_COMPLEX* )malloc((*m)*LDC*sizeof(CBLAS_TEST_COMPLEX)); in F77_cgemm()
91 CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *a, int *lda, in F77_chemm()
92 CBLAS_TEST_COMPLEX *b, int *ldb, CBLAS_TEST_COMPLEX *beta, in F77_chemm()
93 CBLAS_TEST_COMPLEX *c, int *ldc ) { in F77_chemm()
95 CBLAS_TEST_COMPLEX *A, *B, *C; in F77_chemm()
106 A= (CBLAS_TEST_COMPLEX* )malloc((*m)*LDA*sizeof(CBLAS_TEST_COMPLEX)); in F77_chemm()
115 A=(CBLAS_TEST_COMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_COMPLEX ) ); in F77_chemm()
123 B=(CBLAS_TEST_COMPLEX* )malloc( (*m)*LDB*sizeof(CBLAS_TEST_COMPLEX ) ); in F77_chemm()
130 C=(CBLAS_TEST_COMPLEX* )malloc((*m)*LDC*sizeof(CBLAS_TEST_COMPLEX ) ); in F77_chemm()
155 CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *a, int *lda, in F77_csymm()
156 CBLAS_TEST_COMPLEX *b, int *ldb, CBLAS_TEST_COMPLEX *beta, in F77_csymm()
157 CBLAS_TEST_COMPLEX *c, int *ldc ) { in F77_csymm()
159 CBLAS_TEST_COMPLEX *A, *B, *C; in F77_csymm()
170 A=(CBLAS_TEST_COMPLEX* )malloc((*m)*LDA*sizeof(CBLAS_TEST_COMPLEX)); in F77_csymm()
177 A=(CBLAS_TEST_COMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_COMPLEX ) ); in F77_csymm()
183 B=(CBLAS_TEST_COMPLEX* )malloc((*m)*LDB*sizeof(CBLAS_TEST_COMPLEX )); in F77_csymm()
188 C=(CBLAS_TEST_COMPLEX* )malloc((*m)*LDC*sizeof(CBLAS_TEST_COMPLEX)); in F77_csymm()
210 float *alpha, CBLAS_TEST_COMPLEX *a, int *lda, in F77_cherk()
211 float *beta, CBLAS_TEST_COMPLEX *c, int *ldc ) { in F77_cherk()
214 CBLAS_TEST_COMPLEX *A, *C; in F77_cherk()
224 A=(CBLAS_TEST_COMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_COMPLEX ) ); in F77_cherk()
233 A=(CBLAS_TEST_COMPLEX* )malloc((*k)*LDA*sizeof(CBLAS_TEST_COMPLEX ) ); in F77_cherk()
241 C=(CBLAS_TEST_COMPLEX* )malloc((*n)*LDC*sizeof(CBLAS_TEST_COMPLEX ) ); in F77_cherk()
266 CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *a, int *lda, in F77_csyrk()
267 CBLAS_TEST_COMPLEX *beta, CBLAS_TEST_COMPLEX *c, int *ldc ) { in F77_csyrk()
270 CBLAS_TEST_COMPLEX *A, *C; in F77_csyrk()
280 A=(CBLAS_TEST_COMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_COMPLEX)); in F77_csyrk()
289 A=(CBLAS_TEST_COMPLEX* )malloc((*k)*LDA*sizeof(CBLAS_TEST_COMPLEX ) ); in F77_csyrk()
297 C=(CBLAS_TEST_COMPLEX* )malloc((*n)*LDC*sizeof(CBLAS_TEST_COMPLEX ) ); in F77_csyrk()
321 CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *a, int *lda, in F77_cher2k()
322 CBLAS_TEST_COMPLEX *b, int *ldb, float *beta, in F77_cher2k()
323 CBLAS_TEST_COMPLEX *c, int *ldc ) { in F77_cher2k()
325 CBLAS_TEST_COMPLEX *A, *B, *C; in F77_cher2k()
336 A=(CBLAS_TEST_COMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_COMPLEX )); in F77_cher2k()
337 B=(CBLAS_TEST_COMPLEX* )malloc((*n)*LDB*sizeof(CBLAS_TEST_COMPLEX )); in F77_cher2k()
349 A=(CBLAS_TEST_COMPLEX* )malloc( LDA*(*k)*sizeof(CBLAS_TEST_COMPLEX ) ); in F77_cher2k()
350 B=(CBLAS_TEST_COMPLEX* )malloc( LDB*(*k)*sizeof(CBLAS_TEST_COMPLEX ) ); in F77_cher2k()
360 C=(CBLAS_TEST_COMPLEX* )malloc( (*n)*LDC*sizeof(CBLAS_TEST_COMPLEX ) ); in F77_cher2k()
385 CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *a, int *lda, in F77_csyr2k()
386 CBLAS_TEST_COMPLEX *b, int *ldb, CBLAS_TEST_COMPLEX *beta, in F77_csyr2k()
387 CBLAS_TEST_COMPLEX *c, int *ldc ) { in F77_csyr2k()
389 CBLAS_TEST_COMPLEX *A, *B, *C; in F77_csyr2k()
400 A=(CBLAS_TEST_COMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_COMPLEX)); in F77_csyr2k()
401 B=(CBLAS_TEST_COMPLEX* )malloc((*n)*LDB*sizeof(CBLAS_TEST_COMPLEX)); in F77_csyr2k()
413 A=(CBLAS_TEST_COMPLEX* )malloc(LDA*(*k)*sizeof(CBLAS_TEST_COMPLEX)); in F77_csyr2k()
414 B=(CBLAS_TEST_COMPLEX* )malloc(LDB*(*k)*sizeof(CBLAS_TEST_COMPLEX)); in F77_csyr2k()
424 C=(CBLAS_TEST_COMPLEX* )malloc( (*n)*LDC*sizeof(CBLAS_TEST_COMPLEX)); in F77_csyr2k()
449 int *m, int *n, CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *a, in F77_ctrmm()
450 int *lda, CBLAS_TEST_COMPLEX *b, int *ldb) { in F77_ctrmm()
452 CBLAS_TEST_COMPLEX *A, *B; in F77_ctrmm()
466 A=(CBLAS_TEST_COMPLEX* )malloc((*m)*LDA*sizeof(CBLAS_TEST_COMPLEX)); in F77_ctrmm()
475 A=(CBLAS_TEST_COMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_COMPLEX)); in F77_ctrmm()
483 B=(CBLAS_TEST_COMPLEX* )malloc((*m)*LDB*sizeof(CBLAS_TEST_COMPLEX)); in F77_ctrmm()
508 int *m, int *n, CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *a, in F77_ctrsm()
509 int *lda, CBLAS_TEST_COMPLEX *b, int *ldb) { in F77_ctrsm()
511 CBLAS_TEST_COMPLEX *A, *B; in F77_ctrsm()
525 A=(CBLAS_TEST_COMPLEX* )malloc( (*m)*LDA*sizeof(CBLAS_TEST_COMPLEX ) ); in F77_ctrsm()
534 A=(CBLAS_TEST_COMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_COMPLEX)); in F77_ctrsm()
542 B=(CBLAS_TEST_COMPLEX* )malloc((*m)*LDB*sizeof(CBLAS_TEST_COMPLEX)); in F77_ctrsm()