Lines Matching refs:D1
7 Vec D1; member
24 if (ctx->D1) PetscCall(VecPointwiseMult(ctx->W, ctx->D1, ctx->W)); in MatMult_ADA()
66 PetscCall(VecDestroy(&ctx->D1)); in MatDestroy_ADA()
97 if (ctx->D1) { in MatDuplicate_ADA()
98 PetscCall(VecDuplicate(ctx->D1, &D1b)); in MatDuplicate_ADA()
99 PetscCall(VecCopy(ctx->D1, D1b)); in MatDuplicate_ADA()
104 if (ctx->D1) PetscCall(PetscObjectDereference((PetscObject)D1b)); in MatDuplicate_ADA()
118 if (*flg == PETSC_TRUE) PetscCall(VecEqual(ctx1->D1, ctx2->D1, flg)); in MatEqual_ADA()
129 PetscCall(VecScale(ctx->D1, a)); in MatScale_ADA()
164 PetscCall(VecDotBegin(ctx->D1, ctx->W, dtemp + i)); in MatADAComputeDiagonal()
166 for (i = 0; i < n; i++) PetscCall(VecDotEnd(ctx->D1, ctx->W, dtemp + i)); in MatADAComputeDiagonal()
192 Vec D1, D2; in MatCreateSubMatrix_ADA() local
207 if (ctx->D1) { in MatCreateSubMatrix_ADA()
208 PetscCall(VecDuplicate(ctx->D1, &D1)); in MatCreateSubMatrix_ADA()
209 PetscCall(VecCopy(ctx->D1, D1)); in MatCreateSubMatrix_ADA()
211 D1 = NULL; in MatCreateSubMatrix_ADA()
225 PetscCall(MatCreateADA(Atemp, D1, D2, newmat)); in MatCreateSubMatrix_ADA()
228 if (ctx->D1) PetscCall(PetscObjectDereference((PetscObject)D1)); in MatCreateSubMatrix_ADA()
361 ctx->D1 = d1; in MatCreateADA()