Lines Matching refs:CBLAS_TEST_ZOMPLEX
13 CBLAS_TEST_ZOMPLEX *a, int *lda, const void *x, int *incx, in F77_zgemv()
16 CBLAS_TEST_ZOMPLEX *A; in F77_zgemv()
23 A = (CBLAS_TEST_ZOMPLEX *)malloc( (*m)*LDA*sizeof( CBLAS_TEST_ZOMPLEX) ); in F77_zgemv()
42 CBLAS_TEST_ZOMPLEX *alpha, CBLAS_TEST_ZOMPLEX *a, int *lda, in F77_zgbmv()
43 CBLAS_TEST_ZOMPLEX *x, int *incx, in F77_zgbmv()
44 CBLAS_TEST_ZOMPLEX *beta, CBLAS_TEST_ZOMPLEX *y, int *incy) { in F77_zgbmv()
46 CBLAS_TEST_ZOMPLEX *A; in F77_zgbmv()
53 A=( CBLAS_TEST_ZOMPLEX* )malloc((*n+*kl)*LDA*sizeof(CBLAS_TEST_ZOMPLEX)); in F77_zgbmv()
88 void F77_zgeru(int *order, int *m, int *n, CBLAS_TEST_ZOMPLEX *alpha, in F77_zgeru()
89 CBLAS_TEST_ZOMPLEX *x, int *incx, CBLAS_TEST_ZOMPLEX *y, int *incy, in F77_zgeru()
90 CBLAS_TEST_ZOMPLEX *a, int *lda){ in F77_zgeru()
92 CBLAS_TEST_ZOMPLEX *A; in F77_zgeru()
97 A=(CBLAS_TEST_ZOMPLEX*)malloc((*m)*LDA*sizeof(CBLAS_TEST_ZOMPLEX)); in F77_zgeru()
117 void F77_zgerc(int *order, int *m, int *n, CBLAS_TEST_ZOMPLEX *alpha, in F77_zgerc()
118 CBLAS_TEST_ZOMPLEX *x, int *incx, CBLAS_TEST_ZOMPLEX *y, int *incy, in F77_zgerc()
119 CBLAS_TEST_ZOMPLEX *a, int *lda) { in F77_zgerc()
120 CBLAS_TEST_ZOMPLEX *A; in F77_zgerc()
125 A=(CBLAS_TEST_ZOMPLEX* )malloc((*m)*LDA*sizeof(CBLAS_TEST_ZOMPLEX ) ); in F77_zgerc()
145 void F77_zhemv(int *order, char *uplow, int *n, CBLAS_TEST_ZOMPLEX *alpha, in F77_zhemv()
146 CBLAS_TEST_ZOMPLEX *a, int *lda, CBLAS_TEST_ZOMPLEX *x, in F77_zhemv()
147 int *incx, CBLAS_TEST_ZOMPLEX *beta, CBLAS_TEST_ZOMPLEX *y, int *incy){ in F77_zhemv()
149 CBLAS_TEST_ZOMPLEX *A; in F77_zhemv()
157 A = (CBLAS_TEST_ZOMPLEX *)malloc((*n)*LDA*sizeof(CBLAS_TEST_ZOMPLEX)); in F77_zhemv()
176 CBLAS_TEST_ZOMPLEX *alpha, CBLAS_TEST_ZOMPLEX *a, int *lda, in F77_zhbmv()
177 CBLAS_TEST_ZOMPLEX *x, int *incx, CBLAS_TEST_ZOMPLEX *beta, in F77_zhbmv()
178 CBLAS_TEST_ZOMPLEX *y, int *incy){ in F77_zhbmv()
180 CBLAS_TEST_ZOMPLEX *A; in F77_zhbmv()
193 A =(CBLAS_TEST_ZOMPLEX*)malloc((*n+*k)*LDA*sizeof(CBLAS_TEST_ZOMPLEX)); in F77_zhbmv()
239 void F77_zhpmv(int *order, char *uplow, int *n, CBLAS_TEST_ZOMPLEX *alpha, in F77_zhpmv()
240 CBLAS_TEST_ZOMPLEX *ap, CBLAS_TEST_ZOMPLEX *x, int *incx, in F77_zhpmv()
241 CBLAS_TEST_ZOMPLEX *beta, CBLAS_TEST_ZOMPLEX *y, int *incy){ in F77_zhpmv()
243 CBLAS_TEST_ZOMPLEX *A, *AP; in F77_zhpmv()
254 A = (CBLAS_TEST_ZOMPLEX* )malloc(LDA*LDA*sizeof(CBLAS_TEST_ZOMPLEX )); in F77_zhpmv()
255 AP = (CBLAS_TEST_ZOMPLEX* )malloc( (((LDA+1)*LDA)/2)* in F77_zhpmv()
256 sizeof( CBLAS_TEST_ZOMPLEX )); in F77_zhpmv()
296 int *n, int *k, CBLAS_TEST_ZOMPLEX *a, int *lda, CBLAS_TEST_ZOMPLEX *x, in F77_ztbmv()
298 CBLAS_TEST_ZOMPLEX *A; in F77_ztbmv()
314 A=(CBLAS_TEST_ZOMPLEX *)malloc((*n+*k)*LDA*sizeof(CBLAS_TEST_ZOMPLEX)); in F77_ztbmv()
359 int *n, int *k, CBLAS_TEST_ZOMPLEX *a, int *lda, CBLAS_TEST_ZOMPLEX *x, in F77_ztbsv()
362 CBLAS_TEST_ZOMPLEX *A; in F77_ztbsv()
378 A=(CBLAS_TEST_ZOMPLEX*)malloc((*n+*k)*LDA*sizeof(CBLAS_TEST_ZOMPLEX )); in F77_ztbsv()
423 int *n, CBLAS_TEST_ZOMPLEX *ap, CBLAS_TEST_ZOMPLEX *x, int *incx) { in F77_ztpmv()
424 CBLAS_TEST_ZOMPLEX *A, *AP; in F77_ztpmv()
439 A=(CBLAS_TEST_ZOMPLEX*)malloc(LDA*LDA*sizeof(CBLAS_TEST_ZOMPLEX)); in F77_ztpmv()
440 AP=(CBLAS_TEST_ZOMPLEX*)malloc((((LDA+1)*LDA)/2)* in F77_ztpmv()
441 sizeof(CBLAS_TEST_ZOMPLEX)); in F77_ztpmv()
478 int *n, CBLAS_TEST_ZOMPLEX *ap, CBLAS_TEST_ZOMPLEX *x, int *incx) { in F77_ztpsv()
479 CBLAS_TEST_ZOMPLEX *A, *AP; in F77_ztpsv()
494 A=(CBLAS_TEST_ZOMPLEX*)malloc(LDA*LDA*sizeof(CBLAS_TEST_ZOMPLEX)); in F77_ztpsv()
495 AP=(CBLAS_TEST_ZOMPLEX*)malloc((((LDA+1)*LDA)/2)* in F77_ztpsv()
496 sizeof(CBLAS_TEST_ZOMPLEX)); in F77_ztpsv()
533 int *n, CBLAS_TEST_ZOMPLEX *a, int *lda, CBLAS_TEST_ZOMPLEX *x, in F77_ztrmv()
535 CBLAS_TEST_ZOMPLEX *A; in F77_ztrmv()
547 A=(CBLAS_TEST_ZOMPLEX*)malloc((*n)*LDA*sizeof(CBLAS_TEST_ZOMPLEX)); in F77_ztrmv()
562 int *n, CBLAS_TEST_ZOMPLEX *a, int *lda, CBLAS_TEST_ZOMPLEX *x, in F77_ztrsv()
564 CBLAS_TEST_ZOMPLEX *A; in F77_ztrsv()
576 A =(CBLAS_TEST_ZOMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_ZOMPLEX ) ); in F77_ztrsv()
592 CBLAS_TEST_ZOMPLEX *x, int *incx, CBLAS_TEST_ZOMPLEX *ap) { in F77_zhpr()
593 CBLAS_TEST_ZOMPLEX *A, *AP; in F77_zhpr()
604 A = (CBLAS_TEST_ZOMPLEX* )malloc(LDA*LDA*sizeof(CBLAS_TEST_ZOMPLEX ) ); in F77_zhpr()
605 AP = ( CBLAS_TEST_ZOMPLEX* )malloc( (((LDA+1)*LDA)/2)* in F77_zhpr()
606 sizeof( CBLAS_TEST_ZOMPLEX )); in F77_zhpr()
666 void F77_zhpr2(int *order, char *uplow, int *n, CBLAS_TEST_ZOMPLEX *alpha, in F77_zhpr2()
667 CBLAS_TEST_ZOMPLEX *x, int *incx, CBLAS_TEST_ZOMPLEX *y, int *incy, in F77_zhpr2()
668 CBLAS_TEST_ZOMPLEX *ap) { in F77_zhpr2()
669 CBLAS_TEST_ZOMPLEX *A, *AP; in F77_zhpr2()
681 A=(CBLAS_TEST_ZOMPLEX*)malloc( LDA*LDA*sizeof(CBLAS_TEST_ZOMPLEX ) ); in F77_zhpr2()
682 AP=(CBLAS_TEST_ZOMPLEX*)malloc( (((LDA+1)*LDA)/2)* in F77_zhpr2()
683 sizeof( CBLAS_TEST_ZOMPLEX )); in F77_zhpr2()
744 CBLAS_TEST_ZOMPLEX *x, int *incx, CBLAS_TEST_ZOMPLEX *a, int *lda) { in F77_zher()
745 CBLAS_TEST_ZOMPLEX *A; in F77_zher()
753 A=(CBLAS_TEST_ZOMPLEX*)malloc((*n)*LDA*sizeof( CBLAS_TEST_ZOMPLEX )); in F77_zher()
775 void F77_zher2(int *order, char *uplow, int *n, CBLAS_TEST_ZOMPLEX *alpha, in F77_zher2()
776 CBLAS_TEST_ZOMPLEX *x, int *incx, CBLAS_TEST_ZOMPLEX *y, int *incy, in F77_zher2()
777 CBLAS_TEST_ZOMPLEX *a, int *lda) { in F77_zher2()
779 CBLAS_TEST_ZOMPLEX *A; in F77_zher2()
787 A= ( CBLAS_TEST_ZOMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_ZOMPLEX ) ); in F77_zher2()