Lines Matching refs:PtAP
108 PetscErrorCode MyPtShellPMultSymbolic(Mat S, Mat P, Mat PtAP, void **ctx) in MyPtShellPMultSymbolic() argument
114 PetscCall(MatShellSetContext(PtAP, userdata)); in MyPtShellPMultSymbolic()
119 PetscErrorCode MyPtShellPMultNumeric(Mat S, Mat P, Mat PtAP, PetscCtx ctx) in MyPtShellPMultNumeric() argument
133 PetscCall(MatShellSetOperation(PtAP, MATOP_MULT, (PetscErrorCodeFn *)proj_mult)); in MyPtShellPMultNumeric()
134 PetscCall(MatSetUp(PtAP)); in MyPtShellPMultNumeric()
135 PetscCall(MatAssemblyBegin(PtAP, MAT_FINAL_ASSEMBLY)); in MyPtShellPMultNumeric()
136 PetscCall(MatAssemblyEnd(PtAP, MAT_FINAL_ASSEMBLY)); in MyPtShellPMultNumeric()
204 Mat X, B, A, Bt, T, T2, PtAP = NULL, RARt = NULL, R = NULL; in main() local
445 PetscCall(MatPtAP(A, B, MAT_INITIAL_MATRIX, PETSC_DETERMINE, &PtAP)); in main()
446 PetscCall(MatPtAPMultEqual(A, B, PtAP, 10, &flg)); in main()
451 PetscCall(MatAXPY(T2, -1.0, PtAP, SAME_NONZERO_PATTERN)); in main()
540 if (PtAP) PetscCall(MatPtAP(A, B, MAT_REUSE_MATRIX, PETSC_DETERMINE, &PtAP)); in main()
569 PetscCall(MatPtAPMultEqual(T2, B, PtAP, 10, &flg)); in main()
581 PetscCall(MatView(PtAP, NULL)); in main()
582 PetscCall(MatAXPY(TE, -1.0, PtAP, SAME_NONZERO_PATTERN)); in main()
774 PetscCall(MatDestroy(&PtAP)); in main()