Searched refs:H_shell (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/tao/bound/tutorials/ |
| H A D | plate2.c | 57 Mat H_shell; /* to test matrix-free submatrices */ in main() local
136 PetscCall(MatCreateShell(PETSC_COMM_WORLD, m, m, N, N, (void *)&user, &H_shell)); in main()
137 PetscCall(MatShellSetOperation(H_shell, MATOP_MULT, (PetscErrorCodeFn *)MyMatMult)); in main()
138 PetscCall(MatSetOption(H_shell, MAT_SYMMETRIC, PETSC_TRUE)); in main()
139 PetscCall(TaoSetHessian(tao, H_shell, H_shell, MatrixFreeHessian, (void *)&user)); in main()
171 if (flg) PetscCall(MatDestroy(&H_shell)); in main()
853 PetscErrorCode MyMatMult(Mat H_shell, Vec X, Vec Y) in MyMatMult() argument
859 PetscCall(MatShellGetContext(H_shell, &ptr)); in MyMatMult()
|
| /petsc/src/ts/tutorials/optimal_control/ |
| H A D | ex1.c | 555 PetscErrorCode MyMatMult(Mat H_shell, Vec X, Vec Y) in MyMatMult() argument
561 PetscCall(MatShellGetContext(H_shell, &ptr)); in MyMatMult()
|