/home/kcamus/qaas_runs/169-443-9681/intel/AMG/build/AMG/AMG/parcsr_ls/par_strength.c: 1253 - 1278
--------------------------------------------------------------------------------

1253: #pragma omp parallel private(i)
[...]
1259:       hypre_GetSimpleThreadPartition(&i_begin, &i_end, num_cols_diag_S);
1260: 
1261:       for (i = i_begin; i < i_end; i++)
1262:       {
1263:          if (CF_marker[i] > 0) num_coarse_private++;
1264:       }
1265: 
1266:       hypre_prefix_sum(&num_coarse_private, &num_coarse, num_coarse_prefix_sum);
1267: 
1268:       for (i = i_begin; i < i_end; i++)
1269:       {
1270:          if (CF_marker[i] > 0)
1271:          {
1272:             fine_to_coarse[i] = num_coarse_private;
1273:             coarse_to_fine[num_coarse_private] = i;
1274:             num_coarse_private++;
1275:          }
1276:          else
1277:          {
1278:             fine_to_coarse[i] = -1;
