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 }