Searched refs:sgarray (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/mat/impls/sbaij/mpi/ |
| H A D | mmsbaij.c | 10 PetscInt i, j, *aj = B->j, ec = 0, *garray, *sgarray; in MatSetUpMultiply_MPISBAIJ() local
61 PetscCall(PetscMalloc2(2 * ec, &sgarray, ec, &ec_owner)); in MatSetUpMultiply_MPISBAIJ()
79 PetscCall(PetscMalloc2(2 * ec, &sgarray, ec, &ec_owner)); in MatSetUpMultiply_MPISBAIJ()
136 sgarray[i] = garray[i] + (sowners[j] / bs - owners[j]); in MatSetUpMultiply_MPISBAIJ()
140 for (i = ec, j = 0; i < 2 * ec; i++, j++) sgarray[i] = k + j; in MatSetUpMultiply_MPISBAIJ()
141 PetscCall(ISCreateBlock(PETSC_COMM_SELF, bs, 2 * ec, sgarray, PETSC_COPY_VALUES, &from)); in MatSetUpMultiply_MPISBAIJ()
147 for (i = ec; i < 2 * ec; i++) stmp[i] = sgarray[i - ec]; in MatSetUpMultiply_MPISBAIJ()
168 PetscCall(PetscFree2(sgarray, ec_owner)); in MatSetUpMultiply_MPISBAIJ()
|