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

1731:              for (jj1 = S_diag_i[i1]; jj1 < S_diag_i[i1+1]; jj1++)
1732:              {
1733:                  i2 = S_diag_j[jj1];
1734:                  if (CF_marker[i2] > 0)
1735:                  {
1736:                     index = fine_to_coarse[i2];
1737:                     if (S_marker[index] < jj_row_begin_diag)
1738:                     {
1739:                        S_marker[index] = num_nonzeros_diag;
1740:                        num_nonzeros_diag++;
1741:                     }
1742:                  }
1743:                  for (jj2 = S_diag_i[i2]; jj2 < S_diag_i[i2+1]; jj2++)
1744:                  {
1745:                     i3 = S_diag_j[jj2];
1746:                     if (CF_marker[i3] > 0)
1747:                     {
1748:                        index = fine_to_coarse[i3];
1749:                        if (index != ic && S_marker[index] < jj_row_begin_diag)
1750:                        {
1751:                           S_marker[index] = num_nonzeros_diag;
1752:                           num_nonzeros_diag++;
1753:                        }
1754:                     }
1755:                  }
1756:                  for (jj2 = S_offd_i[i2]; jj2 < S_offd_i[i2+1]; jj2++)
1757:                  {
1758:                     i3 = S_offd_j[jj2];
1759:                     if (CF_marker_offd[i3] > 0)
1760:                     {
1761:                        index = map_S_to_C[i3];
1762:                        if (S_marker_offd[index] < jj_row_begin_offd)
1763:                        {
1764:                           S_marker_offd[index] = num_nonzeros_offd;
1765:                           num_nonzeros_offd++;
