Mercurial > hg > sv-dependency-builds
annotate src/fftw-3.3.3/libbench2/mflops.c @ 169:223a55898ab9 tip default
Add null config files
author | Chris Cannam <cannam@all-day-breakfast.com> |
---|---|
date | Mon, 02 Mar 2020 14:03:47 +0000 |
parents | 89f5e221ed7b |
children |
rev | line source |
---|---|
cannam@95 | 1 /* not worth copyrighting */ |
cannam@95 | 2 |
cannam@95 | 3 #include "bench.h" |
cannam@95 | 4 #include <math.h> |
cannam@95 | 5 |
cannam@95 | 6 double mflops(const bench_problem *p, double t) |
cannam@95 | 7 { |
cannam@95 | 8 int size = tensor_sz(p->sz); |
cannam@95 | 9 int vsize = tensor_sz(p->vecsz); |
cannam@95 | 10 |
cannam@95 | 11 if (size <= 1) /* a copy: just return reals copied / time */ |
cannam@95 | 12 switch (p->kind) { |
cannam@95 | 13 case PROBLEM_COMPLEX: |
cannam@95 | 14 return (2.0 * size * vsize / (t * 1.0e6)); |
cannam@95 | 15 case PROBLEM_REAL: |
cannam@95 | 16 case PROBLEM_R2R: |
cannam@95 | 17 return (1.0 * size * vsize / (t * 1.0e6)); |
cannam@95 | 18 } |
cannam@95 | 19 |
cannam@95 | 20 switch (p->kind) { |
cannam@95 | 21 case PROBLEM_COMPLEX: |
cannam@95 | 22 return (5.0 * size * vsize * log((double)size) / |
cannam@95 | 23 (log(2.0) * t * 1.0e6)); |
cannam@95 | 24 case PROBLEM_REAL: |
cannam@95 | 25 case PROBLEM_R2R: |
cannam@95 | 26 return (2.5 * vsize * size * log((double) size) / |
cannam@95 | 27 (log(2.0) * t * 1.0e6)); |
cannam@95 | 28 } |
cannam@95 | 29 BENCH_ASSERT(0 /* can't happen */); |
cannam@95 | 30 return 0.0; |
cannam@95 | 31 } |
cannam@95 | 32 |