10   PetscInt    i, j, rows[2], *parts, cnt, N = 21, nblocks, *blocksizes;  in main()  local
57     cnt = 0;  in main()
61       parts[i] = PetscMin(parts[i], N - cnt);  in main()
62       cnt += parts[i];  in main()
64     parts[size - 1] = N - cnt;  in main()
69     cnt     = 0;  in main()
74       blocksizes[i] = PetscMin(blocksizes[i], N - cnt);  in main()
75       cnt += blocksizes[i];  in main()
76       if (cnt == N) {  in main()
81     if (cnt < N) blocksizes[nblocks - 1] = N - cnt;  in main()
133   PetscInt    i, cnt = 0;  in BuildMatrix()  local
142       PetscCall(MatSetValue(*A, cnt, cnt + blocksizes[i] - 1, 1.0, INSERT_VALUES));  in BuildMatrix()
143       PetscCall(MatSetValue(*A, cnt + blocksizes[i] - 1, cnt, 1.0, INSERT_VALUES));  in BuildMatrix()
144       cnt += blocksizes[i];  in BuildMatrix()