Mercurial > hg > sv-dependency-builds

annotate src/fftw-3.3.8/libbench2/caset.c @ 167:bd3cc4d1df30

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add FFTW 3.3.8 source, and a Linux build
author Chris Cannam <cannam@all-day-breakfast.com>
date Tue, 19 Nov 2019 14:52:55 +0000
parents
children
rev   line source
cannam@167 1 /* not worth copyrighting */
cannam@167 2
cannam@167 3 #include "libbench2/bench.h"
cannam@167 4
cannam@167 5 void caset(bench_complex *A, int n, bench_complex x)
cannam@167 6 {
cannam@167 7 int i;
cannam@167 8 for (i = 0; i < n; ++i) {
cannam@167 9 c_re(A[i]) = c_re(x);
cannam@167 10 c_im(A[i]) = c_im(x);
cannam@167 11 }
cannam@167 12 }