6 do_by_16 (float *x
, int iam
, int ipoints
)
11 a36 (float *x
, int npoints
)
15 omp_set_num_threads (16);
16 #pragma omp parallel shared(x, npoints) private(iam, ipoints)
18 if (omp_get_num_threads () != 16)
20 iam
= omp_get_thread_num ();
21 ipoints
= npoints
/ 16;
22 do_by_16 (x
, iam
, ipoints
);