1274   PetscMPIInt              tagi, tagj, *len_si, *len_s, *len_ri, nrecv, proc, nsend;  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()  local
1335   proc  = 0;  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1337     while (prmap[i] >= owners[proc + 1]) proc++;  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1338     len_si[proc]++;                     /* num of rows in Co(=Pt*A) to be sent to [proc] */  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1339     len_s[proc] += coi[i + 1] - coi[i]; /* num of nonzeros in Co to be sent to [proc] */  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1345   for (proc = 0; proc < size; proc++) {  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1346     owners_co[proc + 1] = owners_co[proc] + len_si[proc];  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1347     if (len_s[proc]) {  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1349       len_si[proc] = 2 * (len_si[proc] + 1); /* length of buf_si to be sent to [proc] */  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1350       len += len_si[proc];  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1362   for (proc = 0, k = 0; proc < size; proc++) {  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1363     if (!len_s[proc]) continue;  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1364     i = owners_co[proc];  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1365     PetscCallMPI(MPIU_Isend(coj + coi[i], len_s[proc], MPIU_INT, proc, tagj, comm, swaits + k));  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1400   for (proc = 0, k = 0; proc < size; proc++) {  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1401     if (!len_s[proc]) continue;  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1407     nrows       = len_si[proc] / 2 - 1; /* num of rows in Co to be sent to [proc] */  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1412     for (i = owners_co[proc]; i < owners_co[proc + 1]; i++) {  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1415       buf_si[nrows + 1]   = prmap[i] - owners[proc]; /* local row index */  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1418     PetscCallMPI(MPIU_Isend(buf_si, len_si[proc], MPIU_INT, proc, tagi, comm, swaits + k));  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1420     buf_si += len_si[proc];  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1600   PetscMPIInt          size, rank, taga, *len_s, proc;  in MatTransposeMatMultNumeric_MPIAIJ_MPIAIJ()  local
1700   for (proc = 0, k = 0; proc < size; proc++) {  in MatTransposeMatMultNumeric_MPIAIJ_MPIAIJ()
1701     if (!len_s[proc]) continue;  in MatTransposeMatMultNumeric_MPIAIJ_MPIAIJ()
1702     i = merge->owners_co[proc];  in MatTransposeMatMultNumeric_MPIAIJ_MPIAIJ()
1703 …PetscCallMPI(MPIU_Isend(coa + coi[i], len_s[proc], MPIU_MATSCALAR, proc, taga, comm, s_waits + k));  in MatTransposeMatMultNumeric_MPIAIJ_MPIAIJ()
1768   PetscMPIInt          size, rank, tagi, tagj, *len_si, *len_s, *len_ri, proc;  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()  local
1878   proc = 0;  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1880     while (prmap[i] >= owners[proc + 1]) proc++;  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1881     len_si[proc]++; /* num of rows in Co to be sent to [proc] */  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1882     len_s[proc] += coi[i + 1] - coi[i];  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1887   for (proc = 0; proc < size; proc++) {  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1888     owners_co[proc + 1] = owners_co[proc] + len_si[proc];  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1889     if (len_s[proc]) {  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1891       len_si[proc] = 2 * (len_si[proc] + 1);  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1892       len += len_si[proc];  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1904   for (proc = 0, k = 0; proc < size; proc++) {  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1905     if (!len_s[proc]) continue;  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1906     i = owners_co[proc];  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1907     PetscCallMPI(MPIU_Isend(coj + coi[i], len_s[proc], MPIU_INT, proc, tagj, comm, swaits + k));  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1933   for (proc = 0, k = 0; proc < size; proc++) {  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1934     if (!len_s[proc]) continue;  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1940     nrows       = len_si[proc] / 2 - 1;  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1945     for (i = owners_co[proc]; i < owners_co[proc + 1]; i++) {  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1948       buf_si[nrows + 1]   = prmap[i] - owners[proc]; /* local row index */  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1951     PetscCallMPI(MPIU_Isend(buf_si, len_si[proc], MPIU_INT, proc, tagi, comm, swaits + k));  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1953     buf_si += len_si[proc];  in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()