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

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
comparison
equal deleted inserted replaced
166:cbd6d7e562c7 167:bd3cc4d1df30
1 /* not worth copyrighting */
2
3 #include "libbench2/bench.h"
4
5 void caset(bench_complex *A, int n, bench_complex x)
6 {
7 int i;
8 for (i = 0; i < n; ++i) {
9 c_re(A[i]) = c_re(x);
10 c_im(A[i]) = c_im(x);
11 }
12 }