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

939:           for (i=thread_start; i < thread_stop; i++)
940:           {
941:              i1 = pass_array[i];
942:              P_diag_start[i1] = cnt_nz;
943:              P_offd_start[i1] = cnt_nz_offd;
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;
[...]
976:              for (j=S_offd_i[i1]; j < S_offd_i[i1+1]; j++)
977:              {
978:                 j1 = S_offd_j[j];
979:                 if (assigned_offd[j1] == pass-1)
980:                 {
981:                    j_start = Pext_start[j1];
982:                    j_end = j_start+Pext_i[j1+1];
983:                    for (k=j_start; k < j_end; k++)
984:                    {
985:                       k1 = Pext_pass[pass][k];
986:                       if (k1 < 0)
987:                       {
988:                          if (P_marker[-k1-1] != i1)
989:                          {
990:                             cnt_nz++;
991:                             P_diag_i[i1+1]++;
992:                             P_marker[-k1-1] = i1;
993:                          }
994:                       }
995:                       else if (P_marker_offd[k1] != i1)
996:                       {
997:                          cnt_nz_offd++;
998:                          P_offd_i[i1+1]++;
999:                          P_marker_offd[k1] = i1;
