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

2307: {
2308:    HYPRE_Int i, cnt;
2309: 
2310:    cnt = 0;
2311:    for (i=0; i < num_var; i++)
2312:    {
2313:       if (CF_marker[i] > 0 )
2314:       {
2315:          if (CF_marker[i] == 1) CF_marker[i] = new_CF_marker[cnt++];
2316:          else { CF_marker[i] = 1; cnt++;}
2317:       }
2318:    }
2319: 
2320:    return 0;
2321: }
