Lines Matching refs:P00
2144 Mat A00, P00, A01, A10, A11, B, N; in PCSetUp_HPDDM() local
2147 PetscCall(MatSchurComplementGetSubMatrices(P, &A00, &P00, &A01, &A10, &A11)); in PCSetUp_HPDDM()
2160 PetscCall(MatCreateVecs(P00, &v, nullptr)); in PCSetUp_HPDDM()
2166 PetscCall(MatGetRowSum(P00, v)); in PCSetUp_HPDDM()
2167 if (A00 == P00) PetscCall(PetscObjectReference((PetscObject)A00)); in PCSetUp_HPDDM()
2168 PetscCall(MatDestroy(&P00)); in PCSetUp_HPDDM()
2170 …bject)A00), A00->rmap->n, A00->cmap->n, A00->rmap->N, A00->cmap->N, 1, nullptr, 0, nullptr, &P00)); in PCSetUp_HPDDM()
2171 PetscCall(MatSetOption(P00, MAT_NO_OFF_PROC_ENTRIES, PETSC_TRUE)); in PCSetUp_HPDDM()
2172 …for (n = A00->rmap->rstart; n < A00->rmap->rend; ++n) PetscCall(MatSetValue(P00, n, n, array[n - A… in PCSetUp_HPDDM()
2173 PetscCall(MatAssemblyBegin(P00, MAT_FINAL_ASSEMBLY)); in PCSetUp_HPDDM()
2174 PetscCall(MatAssemblyEnd(P00, MAT_FINAL_ASSEMBLY)); in PCSetUp_HPDDM()
2176 …PetscCall(MatSchurComplementUpdateSubMatrices(P, A00, P00, A01, A10, A11)); /* replace P00 by diag… in PCSetUp_HPDDM()
2177 PetscCall(MatDestroy(&P00)); in PCSetUp_HPDDM()
2178 } else PetscCall(MatGetDiagonal(P00, v)); in PCSetUp_HPDDM()
2656 Mat A00, P00, A01 = nullptr, A10, A11, N, b[4]; in PCSetUp_HPDDM() local
2675 PetscCall(MatSchurComplementGetSubMatrices(P, &A00, &P00, std::get<1>(*ctx), &A10, &A11)); in PCSetUp_HPDDM()