11   PetscInt     i, j, *aj = B->j, ec = 0, *garray;  in MatSetUpMultiply_MPIBAIJ()  local
33         PetscCall(PetscHMapISet(gid1_lid1, gid1, ++ec));  in MatSetUpMultiply_MPIBAIJ()
38   PetscCall(PetscMalloc1(ec, &garray));  in MatSetUpMultiply_MPIBAIJ()
48   PetscCall(PetscSortInt(ec, garray));  in MatSetUpMultiply_MPIBAIJ()
50   for (i = 0; i < ec; i++) PetscCall(PetscHMapISet(gid1_lid1, garray[i] + 1, i + 1));  in MatSetUpMultiply_MPIBAIJ()
60   B->nbs = ec;  in MatSetUpMultiply_MPIBAIJ()
62 …etscLayoutCreateFromSizes(PetscObjectComm((PetscObject)baij->B), ec * mat->rmap->bs, ec * mat->rma…  in MatSetUpMultiply_MPIBAIJ()
70       if (!indices[aj[B->i[i] + j]]) ec++;  in MatSetUpMultiply_MPIBAIJ()
76   PetscCall(PetscMalloc1(ec, &garray));  in MatSetUpMultiply_MPIBAIJ()
77   ec = 0;  in MatSetUpMultiply_MPIBAIJ()
79     if (indices[i]) garray[ec++] = i;  in MatSetUpMultiply_MPIBAIJ()
83   for (i = 0; i < ec; i++) indices[garray[i]] = i;  in MatSetUpMultiply_MPIBAIJ()
89   B->nbs = ec;  in MatSetUpMultiply_MPIBAIJ()
91 …etscLayoutCreateFromSizes(PetscObjectComm((PetscObject)baij->B), ec * mat->rmap->bs, ec * mat->rma…  in MatSetUpMultiply_MPIBAIJ()
96   PetscCall(VecCreateSeq(PETSC_COMM_SELF, ec * bs, &baij->lvec));  in MatSetUpMultiply_MPIBAIJ()
99   PetscCall(ISCreateBlock(PETSC_COMM_SELF, bs, ec, garray, PETSC_COPY_VALUES, &from));  in MatSetUpMultiply_MPIBAIJ()
101   PetscCall(PetscMalloc1(ec, &stmp));  in MatSetUpMultiply_MPIBAIJ()
102   for (i = 0; i < ec; i++) stmp[i] = i;  in MatSetUpMultiply_MPIBAIJ()
103   PetscCall(ISCreateBlock(PETSC_COMM_SELF, bs, ec, stmp, PETSC_OWN_POINTER, &to));  in MatSetUpMultiply_MPIBAIJ()