Mercurial > hg > sv-dependency-builds
annotate src/fftw-3.3.8/libbench2/caset.c @ 82:d0c2a83c1364
Add FFTW 3.3.8 source, and a Linux build
author | Chris Cannam |
---|---|
date | Tue, 19 Nov 2019 14:52:55 +0000 |
parents | |
children |
rev | line source |
---|---|
Chris@82 | 1 /* not worth copyrighting */ |
Chris@82 | 2 |
Chris@82 | 3 #include "libbench2/bench.h" |
Chris@82 | 4 |
Chris@82 | 5 void caset(bench_complex *A, int n, bench_complex x) |
Chris@82 | 6 { |
Chris@82 | 7 int i; |
Chris@82 | 8 for (i = 0; i < n; ++i) { |
Chris@82 | 9 c_re(A[i]) = c_re(x); |
Chris@82 | 10 c_im(A[i]) = c_im(x); |
Chris@82 | 11 } |
Chris@82 | 12 } |