diff --git a/raster/r.sim/simlib/hydro.c b/raster/r.sim/simlib/hydro.c index 0c03eb2476d..2bcc53bcc88 100644 --- a/raster/r.sim/simlib/hydro.c +++ b/raster/r.sim/simlib/hydro.c @@ -150,21 +150,10 @@ void main_loop(const Setup *setup, const Geometry *geometry, nwalka = 0; sim->nstack = 0; -#pragma omp parallel firstprivate(l, lw, k) reduction(+ : nwalka) +#pragma omp parallel firstprivate(l, k) reduction(+ : nwalka) { -#if defined(_OPENMP) - int steps = (sim->nwalk + omp_get_num_threads() - 1) / - omp_get_num_threads(); - int tid = omp_get_thread_num(); - int min_loop = tid * steps; - int max_loop = ((tid + 1) * steps) > sim->nwalk - ? sim->nwalk - : (tid + 1) * steps; - - for (lw = min_loop; lw < max_loop; lw++) { -#else +#pragma omp for schedule(static) for (lw = 0; lw < sim->nwalk; lw++) { -#endif if (sim->w[lw].m > EPS) { /* check the walker weight */ ++(nwalka); l = (int)((sim->w[lw].x + stxm) / geometry->stepx) -