furnace/extern/fftw/libbench2/aset.c

11 lines
164 B
C

/* not worth copyrighting */
#include "libbench2/bench.h"
void aset(bench_real *A, int n, bench_real x)
{
int i;
for (i = 0; i < n; ++i)
A[i] = x;
}