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

1782:                 for (j=j_start; j < j_end; j++)
1783:                 {
1784:                    k1 = P_diag_pass[pass][j];
1785:                tmp_array[k1] = cnt;
1786:                P_diag_data[cnt] = 0;
1787:                P_diag_j[cnt++] = k1;
