furnace/extern/fftw/libbench2/aset.c
2022-05-31 03:24:29 -05:00

10 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;
}