46   Unit          *todata;  member
50 …omm, const PetscMPIInt tag[], PetscMPIInt tonum, PetscMPIInt rank, void *todata, MPI_Request req[]…  in FSend()  argument
56 …x->rank == *(PetscMPIInt *)todata, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Todata %d does not match rank…  in FSend()
57   PetscCallMPI(MPI_Isend(&fctx->todata[tonum].rank, 1, MPIU_INT, rank, tag[0], comm, &req[0]));  in FSend()
58   PetscCallMPI(MPI_Isend(&fctx->todata[tonum].value, 1, MPIU_SCALAR, rank, tag[1], comm, &req[1]));  in FSend()
83   Unit        *todata, *fromdata;  in main()  local
97   PetscCall(PetscMalloc2(nto, &todata, nto, &toranks));  in main()
100     todata[n].rank  = (rank + i) % size;  in main()
101     todata[n].value = (PetscScalar)rank;  in main()
102     todata[n].ok[0] = 'o';  in main()
103     todata[n].ok[1] = 'k';  in main()
104     todata[n].ok[2] = 0;  in main()
107 …Int_FMT ", %g, \"%s\"}\n", rank, toranks[i], todata[i].rank, (double)PetscRealPart(todata[i].value…  in main()
119     fctx.todata  = todata;  in main()
129 …PetscCall(PetscCommBuildTwoSided(PETSC_COMM_WORLD, 1, dtype, nto, toranks, todata, &nfrom, &fromra…  in main()
163   PetscCall(PetscFree2(todata, toranks));  in main()