Lines Matching refs:w1
58 PetscInt *nrow, *ncol, *w1, *w3, *w4, start, inrqr; in MatCreateSubMatrices_MPIDense_Local() local
103 PetscCall(PetscMalloc3(2 * size, &w1, size, &w3, size, &w4)); in MatCreateSubMatrices_MPIDense_Local()
104 PetscCall(PetscArrayzero(w1, size * 2)); /* initialize work vector*/ in MatCreateSubMatrices_MPIDense_Local()
117 w1[2 * j] += w4[j]; in MatCreateSubMatrices_MPIDense_Local()
125 w1[2 * rank] = 0; /* no mesg sent to self */ in MatCreateSubMatrices_MPIDense_Local()
128 if (w1[2 * i]) { in MatCreateSubMatrices_MPIDense_Local()
129 w1[2 * i + 1] = 1; in MatCreateSubMatrices_MPIDense_Local()
135 if (w1[2 * i]) { in MatCreateSubMatrices_MPIDense_Local()
144 w1[2 * j] += w1[2 * j + 1] + 2 * w3[j]; in MatCreateSubMatrices_MPIDense_Local()
145 msz += w1[2 * j]; in MatCreateSubMatrices_MPIDense_Local()
148 PetscCall(PetscMaxSum(comm, w1, &bsz, &inrqr)); in MatCreateSubMatrices_MPIDense_Local()
170 ict = w1[2 * j]; in MatCreateSubMatrices_MPIDense_Local()
213 PetscCallMPI(MPIU_Isend(sbuf1[j], w1[2 * j], MPIU_INT, j, tag0, comm, s_waits1 + i)); in MatCreateSubMatrices_MPIDense_Local()
221 count = (w1[2 * j] - (2 * sbuf1[j][0] + 1)) * N; in MatCreateSubMatrices_MPIDense_Local()
378 PetscCall(PetscFree3(w1, w3, w4)); in MatCreateSubMatrices_MPIDense_Local()