Searched refs:imark (Results 1 – 5 of 5) sorted by relevance
| /petsc/src/mat/impls/baij/mpi/ |
| H A D | baijov.c | 644 …PetscInt nzA, nzB, *a_i = a->i, *b_i = b->i, *a_j = a->j, *b_j = b->j, ctmp, imark, *cworkA… local
966 imark = l;
967 for (l = 0; l < nzA; l++) cols[imark + l] = cstart + cworkA[l];
968 for (l = imark; l < nzB; l++) cols[nzA + l] = bmap[cworkB[l]];
1272 imark = l;
1273 …for (l = 0; l < nzA; l++) PetscCall(PetscArraycpy(vals + (imark + l) * bs2, vworkA + l * bs2, bs2)…
1274 …for (l = imark; l < nzB; l++) PetscCall(PetscArraycpy(vals + (nzA + l) * bs2, vworkB + l * bs2, bs…
1349 imark = l;
1365 for (l = imark; l < nzB; l++) {
1390 imark = l;
[all …]
|
| H A D | mpibaij.c | 1346 PetscInt imark = -1; in MatGetRow_MPIBAIJ() local
1353 imark = i; in MatGetRow_MPIBAIJ()
1354 for (i = 0; i < nzA; i++) v_p[imark + i] = vworkA[i]; in MatGetRow_MPIBAIJ()
1355 for (i = imark; i < nzB; i++) v_p[nzA + i] = vworkB[i]; in MatGetRow_MPIBAIJ()
1359 if (imark > -1) { in MatGetRow_MPIBAIJ()
1360 for (i = 0; i < imark; i++) idx_p[i] = cmap[cworkB[i] / bs] * bs + cworkB[i] % bs; in MatGetRow_MPIBAIJ()
1366 imark = i; in MatGetRow_MPIBAIJ()
1368 for (i = 0; i < nzA; i++) idx_p[imark + i] = cstart * bs + cworkA[i]; in MatGetRow_MPIBAIJ()
1369 for (i = imark; i < nzB; i++) idx_p[nzA + i] = cmap[cworkB[i] / bs] * bs + cworkB[i] % bs; in MatGetRow_MPIBAIJ()
|
| /petsc/src/mat/impls/sbaij/mpi/ |
| H A D | mpisbaij.c | 1220 PetscInt imark = -1; in MatGetRow_MPISBAIJ() local
1227 imark = i; in MatGetRow_MPISBAIJ()
1228 for (i = 0; i < nzA; i++) v_p[imark + i] = vworkA[i]; in MatGetRow_MPISBAIJ()
1229 for (i = imark; i < nzB; i++) v_p[nzA + i] = vworkB[i]; in MatGetRow_MPISBAIJ()
1233 if (imark > -1) { in MatGetRow_MPISBAIJ()
1234 for (i = 0; i < imark; i++) idx_p[i] = cmap[cworkB[i] / bs] * bs + cworkB[i] % bs; in MatGetRow_MPISBAIJ()
1240 imark = i; in MatGetRow_MPISBAIJ()
1242 for (i = 0; i < nzA; i++) idx_p[imark + i] = cstart * bs + cworkA[i]; in MatGetRow_MPISBAIJ()
1243 for (i = imark; i < nzB; i++) idx_p[nzA + i] = cmap[cworkB[i] / bs] * bs + cworkB[i] % bs; in MatGetRow_MPISBAIJ()
|
| /petsc/src/mat/impls/sell/mpi/ |
| H A D | mpisell.c | 1575 PetscInt i, start, end, ncols, nzA, nzB, *cmap, imark, *idx; in MatMPISELLGetLocalMatCondensed() local
1602 imark = i; in MatMPISELLGetLocalMatCondensed()
1604 for (i = imark; i < nzB; i++) idx[ncols++] = cmap[i]; in MatMPISELLGetLocalMatCondensed()
|
| /petsc/src/mat/impls/aij/mpi/ |
| H A D | mpiaij.c | 1760 PetscInt imark = -1; in MatGetRow_MPIAIJ() local
1767 imark = i; in MatGetRow_MPIAIJ()
1768 for (i = 0; i < nzA; i++) v_p[imark + i] = vworkA[i]; in MatGetRow_MPIAIJ()
1769 for (i = imark; i < nzB; i++) v_p[nzA + i] = vworkB[i]; in MatGetRow_MPIAIJ()
1773 if (imark > -1) { in MatGetRow_MPIAIJ()
1774 for (i = 0; i < imark; i++) idx_p[i] = cmap[cworkB[i]]; in MatGetRow_MPIAIJ()
1780 imark = i; in MatGetRow_MPIAIJ()
1782 for (i = 0; i < nzA; i++) idx_p[imark + i] = cstart + cworkA[i]; in MatGetRow_MPIAIJ()
1783 for (i = imark; i < nzB; i++) idx_p[nzA + i] = cmap[cworkB[i]]; in MatGetRow_MPIAIJ()
5365 PetscInt i, start, end, ncols, nzA, nzB, *cmap, imark, *idx; in MatMPIAIJGetLocalMatCondensed() local
[all …]
|