15               int *k, double *alpha, double *a, int *lda, double *b, int *ldb,  in F77_dgemm()  argument
31               A[i*LDA+j]=a[j*(*lda)+i];  in F77_dgemm()
38               A[i*LDA+j]=a[j*(*lda)+i];  in F77_dgemm()
70      cblas_dgemm( CblasColMajor, transa, transb, *m, *n, *k, *alpha, a, *lda,  in F77_dgemm()
73      cblas_dgemm( UNDEFINED, transa, transb, *m, *n, *k, *alpha, a, *lda,  in F77_dgemm()
77               double *alpha, double *a, int *lda, double *b, int *ldb,  in F77_dsymm()  argument
94               A[i*LDA+j]=a[j*(*lda)+i];  in F77_dsymm()
101               A[i*LDA+j]=a[j*(*lda)+i];  in F77_dsymm()
123      cblas_dsymm( CblasColMajor, side, uplo, *m, *n, *alpha, a, *lda, b, *ldb,   in F77_dsymm()
126      cblas_dsymm( UNDEFINED, side, uplo, *m, *n, *alpha, a, *lda, b, *ldb,   in F77_dsymm()
131               double *alpha, double *a, int *lda,   in F77_dsyrk()  argument
148               A[i*LDA+j]=a[j*(*lda)+i];  in F77_dsyrk()
155               A[i*LDA+j]=a[j*(*lda)+i];  in F77_dsyrk()
171      cblas_dsyrk(CblasColMajor, uplo, trans, *n, *k, *alpha, a, *lda, *beta,   in F77_dsyrk()
174      cblas_dsyrk(UNDEFINED, uplo, trans, *n, *k, *alpha, a, *lda, *beta,   in F77_dsyrk()
179                double *alpha, double *a, int *lda, double *b, int *ldb,  in F77_dsyr2k()  argument
197               A[i*LDA+j]=a[j*(*lda)+i];  in F77_dsyr2k()
208               A[i*LDA+j]=a[j*(*lda)+i];  in F77_dsyr2k()
227      cblas_dsyr2k(CblasColMajor, uplo, trans, *n, *k, *alpha, a, *lda,   in F77_dsyr2k()
230      cblas_dsyr2k(UNDEFINED, uplo, trans, *n, *k, *alpha, a, *lda,   in F77_dsyr2k()
234               int *m, int *n, double *alpha, double *a, int *lda, double *b,   in F77_dtrmm()  argument
254               A[i*LDA+j]=a[j*(*lda)+i];  in F77_dtrmm()
261               A[i*LDA+j]=a[j*(*lda)+i];  in F77_dtrmm()
278 		   a, *lda, b, *ldb);  in F77_dtrmm()
281 		   a, *lda, b, *ldb);  in F77_dtrmm()
285               int *m, int *n, double *alpha, double *a, int *lda, double *b,  in F77_dtrsm()  argument
305               A[i*LDA+j]=a[j*(*lda)+i];  in F77_dtrsm()
312               A[i*LDA+j]=a[j*(*lda)+i];  in F77_dtrsm()
329 		   a, *lda, b, *ldb);  in F77_dtrsm()
332 		   a, *lda, b, *ldb);  in F77_dtrsm()