Logo ROOT   6.10/09
Reference Guide
cblas.cxx
Go to the documentation of this file.
1 // import just a cblas symbol in mathmore
2 #include "gsl/gsl_cblas.h"
3 
4 namespace ROOT {
5 
6  namespace Math {
7 
8  namespace Blas {
9 
10  // multiplication C = A * B where (n,m) is the size of C, A is size (n,k) and B is size (k,m)
11  void AMultB(int n, int m, int k, const double * A, const double * B, double *C) {
12  cblas_dgemm(CblasRowMajor, CblasNoTrans, CblasNoTrans, n, m, k, 1.0, A, k, B, m, 0.0, C, m);
13  }
14  // multiplication C = AT * B where (n,m) is the size of C, A is size (k,n) and B is size (k,m)
15  void ATMultB(int n, int m, int k, const double * A, const double * B, double *C) {
16  cblas_dgemm(CblasRowMajor, CblasTrans, CblasNoTrans, n, m, k, 1.0, A, n, B, m, 0.0, C, m);
17  }
18 
19  }
20  }
21 }
static double B[]
Namespace for new ROOT classes and functions.
Definition: StringConv.hxx:21
void ATMultB(int n, int m, int k, const double *A, const double *B, double *C)
Definition: cblas.cxx:15
static double A[]
void AMultB(int n, int m, int k, const double *A, const double *B, double *C)
Definition: cblas.cxx:11
static double C[]
TMarker * m
Definition: textangle.C:8
Namespace for new Math classes and functions.
const Int_t n
Definition: legend1.C:16