Lines Matching refs:CBLAS_TEST_COMPLEX
13 CBLAS_TEST_COMPLEX *a, int *lda, const void *x, int *incx, in F77_cgemv()
16 CBLAS_TEST_COMPLEX *A; in F77_cgemv()
23 A = (CBLAS_TEST_COMPLEX *)malloc( (*m)*LDA*sizeof( CBLAS_TEST_COMPLEX) ); in F77_cgemv()
42 CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *a, int *lda, in F77_cgbmv()
43 CBLAS_TEST_COMPLEX *x, int *incx, in F77_cgbmv()
44 CBLAS_TEST_COMPLEX *beta, CBLAS_TEST_COMPLEX *y, int *incy) { in F77_cgbmv()
46 CBLAS_TEST_COMPLEX *A; in F77_cgbmv()
53 A=( CBLAS_TEST_COMPLEX* )malloc((*n+*kl)*LDA*sizeof(CBLAS_TEST_COMPLEX)); in F77_cgbmv()
88 void F77_cgeru(int *order, int *m, int *n, CBLAS_TEST_COMPLEX *alpha, in F77_cgeru()
89 CBLAS_TEST_COMPLEX *x, int *incx, CBLAS_TEST_COMPLEX *y, int *incy, in F77_cgeru()
90 CBLAS_TEST_COMPLEX *a, int *lda){ in F77_cgeru()
92 CBLAS_TEST_COMPLEX *A; in F77_cgeru()
97 A=(CBLAS_TEST_COMPLEX*)malloc((*m)*LDA*sizeof(CBLAS_TEST_COMPLEX)); in F77_cgeru()
117 void F77_cgerc(int *order, int *m, int *n, CBLAS_TEST_COMPLEX *alpha, in F77_cgerc()
118 CBLAS_TEST_COMPLEX *x, int *incx, CBLAS_TEST_COMPLEX *y, int *incy, in F77_cgerc()
119 CBLAS_TEST_COMPLEX *a, int *lda) { in F77_cgerc()
120 CBLAS_TEST_COMPLEX *A; in F77_cgerc()
125 A=(CBLAS_TEST_COMPLEX* )malloc((*m)*LDA*sizeof(CBLAS_TEST_COMPLEX ) ); in F77_cgerc()
145 void F77_chemv(int *order, char *uplow, int *n, CBLAS_TEST_COMPLEX *alpha, in F77_chemv()
146 CBLAS_TEST_COMPLEX *a, int *lda, CBLAS_TEST_COMPLEX *x, in F77_chemv()
147 int *incx, CBLAS_TEST_COMPLEX *beta, CBLAS_TEST_COMPLEX *y, int *incy){ in F77_chemv()
149 CBLAS_TEST_COMPLEX *A; in F77_chemv()
157 A = (CBLAS_TEST_COMPLEX *)malloc((*n)*LDA*sizeof(CBLAS_TEST_COMPLEX)); in F77_chemv()
176 CBLAS_TEST_COMPLEX *alpha, CBLAS_TEST_COMPLEX *a, int *lda, in F77_chbmv()
177 CBLAS_TEST_COMPLEX *x, int *incx, CBLAS_TEST_COMPLEX *beta, in F77_chbmv()
178 CBLAS_TEST_COMPLEX *y, int *incy){ in F77_chbmv()
180 CBLAS_TEST_COMPLEX *A; in F77_chbmv()
193 A =(CBLAS_TEST_COMPLEX*)malloc((*n+*k)*LDA*sizeof(CBLAS_TEST_COMPLEX)); in F77_chbmv()
239 void F77_chpmv(int *order, char *uplow, int *n, CBLAS_TEST_COMPLEX *alpha, in F77_chpmv()
240 CBLAS_TEST_COMPLEX *ap, CBLAS_TEST_COMPLEX *x, int *incx, in F77_chpmv()
241 CBLAS_TEST_COMPLEX *beta, CBLAS_TEST_COMPLEX *y, int *incy){ in F77_chpmv()
243 CBLAS_TEST_COMPLEX *A, *AP; in F77_chpmv()
254 A = (CBLAS_TEST_COMPLEX* )malloc(LDA*LDA*sizeof(CBLAS_TEST_COMPLEX )); in F77_chpmv()
255 AP = (CBLAS_TEST_COMPLEX* )malloc( (((LDA+1)*LDA)/2)* in F77_chpmv()
256 sizeof( CBLAS_TEST_COMPLEX )); in F77_chpmv()
296 int *n, int *k, CBLAS_TEST_COMPLEX *a, int *lda, CBLAS_TEST_COMPLEX *x, in F77_ctbmv()
298 CBLAS_TEST_COMPLEX *A; in F77_ctbmv()
314 A=(CBLAS_TEST_COMPLEX *)malloc((*n+*k)*LDA*sizeof(CBLAS_TEST_COMPLEX)); in F77_ctbmv()
359 int *n, int *k, CBLAS_TEST_COMPLEX *a, int *lda, CBLAS_TEST_COMPLEX *x, in F77_ctbsv()
362 CBLAS_TEST_COMPLEX *A; in F77_ctbsv()
378 A=(CBLAS_TEST_COMPLEX*)malloc((*n+*k)*LDA*sizeof(CBLAS_TEST_COMPLEX )); in F77_ctbsv()
423 int *n, CBLAS_TEST_COMPLEX *ap, CBLAS_TEST_COMPLEX *x, int *incx) { in F77_ctpmv()
424 CBLAS_TEST_COMPLEX *A, *AP; in F77_ctpmv()
439 A=(CBLAS_TEST_COMPLEX*)malloc(LDA*LDA*sizeof(CBLAS_TEST_COMPLEX)); in F77_ctpmv()
440 AP=(CBLAS_TEST_COMPLEX*)malloc((((LDA+1)*LDA)/2)* in F77_ctpmv()
441 sizeof(CBLAS_TEST_COMPLEX)); in F77_ctpmv()
478 int *n, CBLAS_TEST_COMPLEX *ap, CBLAS_TEST_COMPLEX *x, int *incx) { in F77_ctpsv()
479 CBLAS_TEST_COMPLEX *A, *AP; in F77_ctpsv()
494 A=(CBLAS_TEST_COMPLEX*)malloc(LDA*LDA*sizeof(CBLAS_TEST_COMPLEX)); in F77_ctpsv()
495 AP=(CBLAS_TEST_COMPLEX*)malloc((((LDA+1)*LDA)/2)* in F77_ctpsv()
496 sizeof(CBLAS_TEST_COMPLEX)); in F77_ctpsv()
533 int *n, CBLAS_TEST_COMPLEX *a, int *lda, CBLAS_TEST_COMPLEX *x, in F77_ctrmv()
535 CBLAS_TEST_COMPLEX *A; in F77_ctrmv()
547 A=(CBLAS_TEST_COMPLEX*)malloc((*n)*LDA*sizeof(CBLAS_TEST_COMPLEX)); in F77_ctrmv()
562 int *n, CBLAS_TEST_COMPLEX *a, int *lda, CBLAS_TEST_COMPLEX *x, in F77_ctrsv()
564 CBLAS_TEST_COMPLEX *A; in F77_ctrsv()
576 A =(CBLAS_TEST_COMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_COMPLEX ) ); in F77_ctrsv()
592 CBLAS_TEST_COMPLEX *x, int *incx, CBLAS_TEST_COMPLEX *ap) { in F77_chpr()
593 CBLAS_TEST_COMPLEX *A, *AP; in F77_chpr()
604 A = (CBLAS_TEST_COMPLEX* )malloc(LDA*LDA*sizeof(CBLAS_TEST_COMPLEX ) ); in F77_chpr()
605 AP = ( CBLAS_TEST_COMPLEX* )malloc( (((LDA+1)*LDA)/2)* in F77_chpr()
606 sizeof( CBLAS_TEST_COMPLEX )); in F77_chpr()
666 void F77_chpr2(int *order, char *uplow, int *n, CBLAS_TEST_COMPLEX *alpha, in F77_chpr2()
667 CBLAS_TEST_COMPLEX *x, int *incx, CBLAS_TEST_COMPLEX *y, int *incy, in F77_chpr2()
668 CBLAS_TEST_COMPLEX *ap) { in F77_chpr2()
669 CBLAS_TEST_COMPLEX *A, *AP; in F77_chpr2()
681 A=(CBLAS_TEST_COMPLEX*)malloc( LDA*LDA*sizeof(CBLAS_TEST_COMPLEX ) ); in F77_chpr2()
682 AP=(CBLAS_TEST_COMPLEX*)malloc( (((LDA+1)*LDA)/2)* in F77_chpr2()
683 sizeof( CBLAS_TEST_COMPLEX )); in F77_chpr2()
744 CBLAS_TEST_COMPLEX *x, int *incx, CBLAS_TEST_COMPLEX *a, int *lda) { in F77_cher()
745 CBLAS_TEST_COMPLEX *A; in F77_cher()
753 A=(CBLAS_TEST_COMPLEX*)malloc((*n)*LDA*sizeof( CBLAS_TEST_COMPLEX )); in F77_cher()
775 void F77_cher2(int *order, char *uplow, int *n, CBLAS_TEST_COMPLEX *alpha, in F77_cher2()
776 CBLAS_TEST_COMPLEX *x, int *incx, CBLAS_TEST_COMPLEX *y, int *incy, in F77_cher2()
777 CBLAS_TEST_COMPLEX *a, int *lda) { in F77_cher2()
779 CBLAS_TEST_COMPLEX *A; in F77_cher2()
787 A= ( CBLAS_TEST_COMPLEX* )malloc((*n)*LDA*sizeof(CBLAS_TEST_COMPLEX ) ); in F77_cher2()