|
MADNESS 0.10.1
|
#include <madness/madness_config.h>#include <stdio.h>#include <stdlib.h>#include <math.h>#include <madness/world/safempi.h>#include <madness/world/posixmem.h>#include <madness/tensor/cblas.h>#include <madness/tensor/tensor.h>#include <madness/tensor/mxm.h>
Macros | |
| #define | TIME_DGEMM |
Functions | |
| void | crap (double rate, double fastest, double start) |
| int | main (int argc, char *argv[]) |
| void | mTxm (long dimi, long dimj, long dimk, double *c, const double *a, const double *b) |
| void | mTxm_dgemm (long ni, long nj, long nk, double *c, const double *a, const double *b) |
| double | ran () |
| void | ran_fill (int n, double *a) |
| void | timer (const char *s, long ni, long nj, long nk, double *a, double *b, double *c) |
| void | trantimer (const char *s, long ni, long nj, long nk, double *a, double *b, double *c) |
Variables | |
| bool | smalltest = false |
| #define TIME_DGEMM |
| void crap | ( | double | rate, |
| double | fastest, | ||
| double | start | ||
| ) |
Referenced by timer(), and trantimer().
| int main | ( | int | argc, |
| char * | argv[] | ||
| ) |
References a, std::abs(), b, c, d, e(), SafeMPI::Finalize(), SafeMPI::Init_thread(), m, MPI_THREAD_SINGLE, madness::mTxm(), madness::mTxmq(), posix_memalign(), ran_fill(), smalltest, and trantimer().
| void mTxm | ( | long | dimi, |
| long | dimj, | ||
| long | dimk, | ||
| double * | c, | ||
| const double * | a, | ||
| const double * | b | ||
| ) |
| void mTxm_dgemm | ( | long | ni, |
| long | nj, | ||
| long | nk, | ||
| double * | c, | ||
| const double * | a, | ||
| const double * | b | ||
| ) |
References a, b, c, madness::cblas::gemm(), madness::cblas::NoTrans, one(), and madness::cblas::Trans.
Referenced by timer(), and trantimer().
| double ran | ( | ) |
Referenced by ran_fill().
| void timer | ( | const char * | s, |
| long | ni, | ||
| long | nj, | ||
| long | nk, | ||
| double * | a, | ||
| double * | b, | ||
| double * | c | ||
| ) |
References a, b, c, crap(), mTxm_dgemm(), madness::mTxmq(), and SafeMPI::Wtime().
| void trantimer | ( | const char * | s, |
| long | ni, | ||
| long | nj, | ||
| long | nk, | ||
| double * | a, | ||
| double * | b, | ||
| double * | c | ||
| ) |
References a, b, c, crap(), mTxm_dgemm(), madness::mTxmq(), and SafeMPI::Wtime().
Referenced by main().
| bool smalltest = false |
Referenced by main().