64   PetscInt   mask, edge;  in PCTFS_giop()  local
104     for (mask = 1, edge = 0; edge < PCTFS_i_log2_num_nodes; edge++, mask <<= 1) {  in PCTFS_giop()
115     for (edge = 0; edge < PCTFS_i_log2_num_nodes; edge++, mask >>= 1) {  in PCTFS_giop()
141   PetscInt   mask, edge;  in PCTFS_grop()  local
180     for (mask = 1, edge = 0; edge < PCTFS_i_log2_num_nodes; edge++, mask <<= 1) {  in PCTFS_grop()
191     for (edge = 0; edge < PCTFS_i_log2_num_nodes; edge++, mask >>= 1) {  in PCTFS_grop()
217   PetscInt   mask, edge;  in PCTFS_grop_hc()  local
249   for (mask = 1, edge = 0; edge < dim; edge++, mask <<= 1) {  in PCTFS_grop_hc()
259   if (edge == dim) mask >>= 1;  in PCTFS_grop_hc()
261     while (++edge < dim) mask <<= 1;  in PCTFS_grop_hc()
264   for (edge = 0; edge < dim; edge++, mask >>= 1) {  in PCTFS_grop_hc()
280   PetscInt     edge, type, dest, mask;  in PCTFS_ssgl_radd()  local
291   for (mask = 0, edge = 0; edge < level; edge++, mask++) {  in PCTFS_ssgl_radd()
292     stage_n = (segs[level] - segs[edge]);  in PCTFS_ssgl_radd()
294       dest = edge_node[edge];  in PCTFS_ssgl_radd()
295       type = MSGTAG3 + PCTFS_my_id + (PCTFS_num_nodes * edge);  in PCTFS_ssgl_radd()
297         PetscCallMPI(MPI_Send(vals + segs[edge], stage_n, MPIU_SCALAR, dest, type, MPI_COMM_WORLD));  in PCTFS_ssgl_radd()
301         PetscCall(PCTFS_rvec_add(vals + segs[edge], work, stage_n));  in PCTFS_ssgl_radd()
307   for (edge = 0; edge < level; edge++) {  in PCTFS_ssgl_radd()
308     stage_n = (segs[level] - segs[level - 1 - edge]);  in PCTFS_ssgl_radd()
310       dest = edge_node[level - edge - 1];  in PCTFS_ssgl_radd()
311       type = MSGTAG6 + PCTFS_my_id + (PCTFS_num_nodes * edge);  in PCTFS_ssgl_radd()
316 …PetscCallMPI(MPI_Send(vals + segs[level - 1 - edge], stage_n, MPIU_SCALAR, dest, type, MPI_COMM_WO…  in PCTFS_ssgl_radd()
319 …PetscCallMPI(MPI_Recv(vals + segs[level - 1 - edge], stage_n, MPIU_SCALAR, MPI_ANY_SOURCE, type, M…  in PCTFS_ssgl_radd()
330   PetscInt   mask, edge;  in PCTFS_giop_hc()  local
362   for (mask = 1, edge = 0; edge < dim; edge++, mask <<= 1) {  in PCTFS_giop_hc()
372   if (edge == dim) mask >>= 1;  in PCTFS_giop_hc()
374     while (++edge < dim) mask <<= 1;  in PCTFS_giop_hc()
377   for (edge = 0; edge < dim; edge++, mask >>= 1) {  in PCTFS_giop_hc()