287 …PetscInt           i, j, m, n, bs = 1, ncols, *lens, currentcol, mbs, **ii, *ilens, nextcol, *llen…  in MatLoad_BlockMat()  local
310   PetscCall(PetscMalloc3(mbs, &lens, bs, &ii, bs, &ilens));  in MatLoad_BlockMat()
316       ilens[j] = a->i[i * bs + j + 1] - a->i[i * bs + j];  in MatLoad_BlockMat()
324         while (ilens[j] > 0 && ii[j][0] / bs <= currentcol) {  in MatLoad_BlockMat()
326           ilens[j]--;  in MatLoad_BlockMat()
328         if (ilens[j] > 0) {  in MatLoad_BlockMat()
349       ilens[j] = a->i[i * bs + j + 1] - a->i[i * bs + j];  in MatLoad_BlockMat()
354       if (ilens[j] > 0) currentcol = PetscMin(currentcol, ii[j][0] / bs);  in MatLoad_BlockMat()
362         while (ilens[j] > 0 && ii[j][0] / bs <= currentcol) { /* loop over columns in row */  in MatLoad_BlockMat()
364           ilens[j]--;  in MatLoad_BlockMat()
367         if (ilens[j] > 0) {  in MatLoad_BlockMat()
384   PetscCall(PetscFree3(lens, ii, ilens));  in MatLoad_BlockMat()