LINEAR++ library: AFF to LAPACK
blas3.h
Go to the documentation of this file.
1 /* LAPACK++ (V. 1.1) */
2 /* (C) 1992-1996 All Rights Reserved. */
3 // Copyright (c) 1992 by J. J. Dongarra, E. Greaser, R. Pozo, D. Walker
4 // see file README.lapack++
5 
6 
7 #include <generic.h>
8 #include "arch.h"
9 #include "f2c.h"
10 
11 extern "C"
12 {
13  void F77NAME(dgemm)(char *transa, char *transb, integer *m, integer *n, integer *k,
14  double *alpha, const double *a, integer *lda, const double *b,
15  integer *ldb, double *beta, double *c, integer *ldc);
16 
17  void F77NAME(dtrsm)(char *side, char *uplo, char *transa, char *diag,
18  integer *m, integer *n, double *alpha, const double *A, integer *lda,
19  const double *B, integer *ldb);
20 
21  void F77NAME(dtrmm)(char *side, char *uplo, char *transa, char *diag,
22  integer *m, integer *n, double *alpha, const double *A, integer *lda,
23  const double *B, integer *ldb);
24 
25  void F77NAME(dsymm)(char *side, char *uplo, integer *m, integer *n,
26  double *alpha, const double *A, integer *lda, const double *B,
27  integer *ldb, double *beta, double *C, integer *ldc);
28 
29  void F77NAME(dsyrk)(char *uplo, char *transa, integer *n, integer *k,
30  double *alpha, double *A, integer *lda, double *beta, double *C,
31  integer *ldc);
32 
33  void F77NAME(dsyr2k)(char *uplo, char *transa, integer *n, integer *k,
34  double *alpha, double *A, integer *lda, double *B, integer *ldb,
35  double *beta, double *C, integer *ldc);
36 }
37 
void F77NAME() dsyr2k(char *uplo, char *transa, integer *n, integer *k, double *alpha, double *A, integer *lda, double *B, integer *ldb, double *beta, double *C, integer *ldc)
void F77NAME() dtrmm(char *side, char *uplo, char *transa, char *diag, integer *m, integer *n, double *alpha, const double *A, integer *lda, const double *B, integer *ldb)
void F77NAME() dgemm(char *transa, char *transb, integer *m, integer *n, integer *k, double *alpha, const double *a, integer *lda, const double *b, integer *ldb, double *beta, double *c, integer *ldc)
long int integer
Definition: f77lapack.h:61
void F77NAME() dsymm(char *side, char *uplo, integer *m, integer *n, double *alpha, const double *A, integer *lda, const double *B, integer *ldb, double *beta, double *C, integer *ldc)
void F77NAME() dtrsm(char *side, char *uplo, char *transa, char *diag, integer *m, integer *n, double *alpha, const double *A, integer *lda, const double *B, integer *ldb)
#define F77NAME(x)
Definition: arch.h:17
void F77NAME() dsyrk(char *uplo, char *transa, integer *n, integer *k, double *alpha, double *A, integer *lda, double *beta, double *C, integer *ldc)