Mercurial > hg > sv-dependency-builds
annotate src/fftw-3.3.5/libbench2/caset.c @ 42:2cd0e3b3e1fd
Current fftw source
author | Chris Cannam |
---|---|
date | Tue, 18 Oct 2016 13:40:26 +0100 |
parents | |
children |
rev | line source |
---|---|
Chris@42 | 1 /* not worth copyrighting */ |
Chris@42 | 2 |
Chris@42 | 3 #include "bench.h" |
Chris@42 | 4 |
Chris@42 | 5 void caset(bench_complex *A, int n, bench_complex x) |
Chris@42 | 6 { |
Chris@42 | 7 int i; |
Chris@42 | 8 for (i = 0; i < n; ++i) { |
Chris@42 | 9 c_re(A[i]) = c_re(x); |
Chris@42 | 10 c_im(A[i]) = c_im(x); |
Chris@42 | 11 } |
Chris@42 | 12 } |