Lines Matching refs:appctx

25   AppCtx   *appctx;  member
61 AppCtx *appctx; in MyRHSMatMultTranspose() local
71 appctx = mctx->appctx; in MyRHSMatMultTranspose()
106 y[j][i].u = appctx->D1 * (uxx + uyy) - ucb * (vc * vc + appctx->gamma) + vc * vc * vcb; in MyRHSMatMultTranspose()
107 …y[j][i].v = appctx->D2 * (vxx + vyy) - 2.0 * uc * vc * ucb + (2.0 * uc * vc - appctx->gamma - appc… in MyRHSMatMultTranspose()
120 AppCtx *appctx; in MyIMatMultTranspose() local
130 appctx = mctx->appctx; in MyIMatMultTranspose()
165 y[j][i].u = appctx->D1 * (uxx + uyy) - ucb * (vc * vc + appctx->gamma) + vc * vc * vcb; in MyIMatMultTranspose()
166 …y[j][i].v = appctx->D2 * (vxx + vyy) - 2.0 * uc * vc * ucb + (2.0 * uc * vc - appctx->gamma - appc… in MyIMatMultTranspose()
181 AppCtx *appctx; in MyIMatMult() local
191 appctx = mctx->appctx; in MyIMatMult()
226 y[j][i].u = appctx->D1 * (uxx + uyy) - (vc * vc + appctx->gamma) * ucb - 2.0 * uc * vc * vcb; in MyIMatMult()
227 …y[j][i].v = appctx->D2 * (vxx + vyy) + vc * vc * ucb + (2.0 * uc * vc - appctx->gamma - appctx->ka… in MyIMatMult()
244 AppCtx appctx; in main() local
255 appctx.aijpc = PETSC_FALSE; in main()
256 PetscCall(PetscOptionsGetBool(NULL, NULL, "-aijpc", &appctx.aijpc, NULL)); in main()
259 appctx.D1 = 8.0e-5; in main()
260 appctx.D2 = 4.0e-5; in main()
261 appctx.gamma = .024; in main()
262 appctx.kappa = .06; in main()
289 PetscCall(TSSetRHSFunction(ts, NULL, RHSFunction, &appctx)); in main()
290 PetscCall(TSSetRHSJacobian(ts, NULL, NULL, RHSJacobian, &appctx)); in main()
293 PetscCall(TSSetIFunction(ts, NULL, IFunction, &appctx)); in main()
294 if (appctx.aijpc) { in main()
301 PetscCall(TSSetIJacobian(ts, A, B, IJacobian, &appctx)); in main()
305 PetscCall(TSSetIJacobian(ts, NULL, NULL, IJacobian, &appctx)); in main()
312 mctx.appctx = &appctx; in main()
319 …PETSC_COMM_WORLD, dof * xm * ym, PETSC_DETERMINE, dof * Mx * My, dof * Mx * My, &mctx, &appctx.A)); in main()
320 …PetscCall(MatShellSetOperation(appctx.A, MATOP_MULT_TRANSPOSE, (PetscErrorCodeFn *)MyRHSMatMultTra… in main()
322 PetscCall(TSSetRHSJacobian(ts, appctx.A, appctx.A, RHSJacobianShell, &appctx)); in main()
325 PetscCall(MatShellSetOperation(appctx.A, MATOP_MULT, (PetscErrorCodeFn *)MyIMatMult)); in main()
326 …PetscCall(MatShellSetOperation(appctx.A, MATOP_MULT_TRANSPOSE, (PetscErrorCodeFn *)MyIMatMultTrans… in main()
327 PetscCall(TSSetIJacobian(ts, appctx.A, appctx.A, IJacobianShell, &appctx)); in main()
381 PetscCall(MatDestroy(&appctx.A)); in main()