Lines Matching refs:RARt
140 PetscErrorCode MyRShellRtMultSymbolic(Mat S, Mat R, Mat RARt, void **ctx) in MyRShellRtMultSymbolic() argument
146 PetscCall(MatShellSetContext(RARt, userdata)); in MyRShellRtMultSymbolic()
151 PetscErrorCode MyRShellRtMultNumeric(Mat S, Mat R, Mat RARt, PetscCtx ctx) in MyRShellRtMultNumeric() argument
165 PetscCall(MatShellSetOperation(RARt, MATOP_MULT, (PetscErrorCodeFn *)proj_mult)); in MyRShellRtMultNumeric()
166 PetscCall(MatSetUp(RARt)); in MyRShellRtMultNumeric()
167 PetscCall(MatAssemblyBegin(RARt, MAT_FINAL_ASSEMBLY)); in MyRShellRtMultNumeric()
168 PetscCall(MatAssemblyEnd(RARt, MAT_FINAL_ASSEMBLY)); in MyRShellRtMultNumeric()
204 Mat X, B, A, Bt, T, T2, PtAP = NULL, RARt = NULL, R = NULL; in main() local
461 PetscCall(MatRARt(A, R, MAT_INITIAL_MATRIX, PETSC_DETERMINE, &RARt)); in main()
462 PetscCall(MatRARtMultEqual(A, R, RARt, 10, &flg)); in main()
467 PetscCall(MatAXPY(T2, -1.0, RARt, SAME_NONZERO_PATTERN)); in main()
541 if (RARt) PetscCall(MatRARt(A, R, MAT_REUSE_MATRIX, PETSC_DETERMINE, &RARt)); in main()
588 if (RARt) { in main()
589 PetscCall(MatRARtMultEqual(T2, R, RARt, 10, &flg)); in main()
602 if (RARt) { in main()
603 PetscCall(MatView(RARt, NULL)); in main()
604 PetscCall(MatAXPY(TE, -1.0, RARt, SAME_NONZERO_PATTERN)); in main()
775 PetscCall(MatDestroy(&RARt)); in main()