/home/kcamus/qaas_runs/169-443-9681/intel/AMG/build/AMG/AMG/parcsr_ls/par_multi_interp.c: 944 - 970
--------------------------------------------------------------------------------

944:              for (j=S_diag_i[i1]; j < S_diag_i[i1+1]; j++)
945:              {
946:                 j1 = S_diag_j[j];
947:                 if (assigned[j1] == pass-1)
948:                 {
949:                    j_start = P_diag_start[j1];
950:                    j_end = j_start+P_diag_i[j1+1];
951:                    for (k=j_start; k < j_end; k++)
952:                    {
953:                       k1 = P_diag_pass[pass-1][k];
954:                       if (P_marker[k1] != i1)
955:                       {
956:                          cnt_nz++;
957:                          P_diag_i[i1+1]++;
958:                          P_marker[k1] = i1;
959:                       }
960:                    }
961:                    j_start = P_offd_start[j1];
962:                    j_end = j_start+P_offd_i[j1+1];
963:                    for (k=j_start; k < j_end; k++)
964:                    {
965:                       k1 = P_offd_pass[pass-1][k];
966:                       if (P_marker_offd[k1] != i1)
967:                       {
968:                          cnt_nz_offd++;
969:                          P_offd_i[i1+1]++;
970:                          P_marker_offd[k1] = i1;
