Lines Matching refs:appctx

29   AppCtx     *appctx = (AppCtx *)ptr;  in RHSFunction()  local
77 f[j][i].u = appctx->D1 * (uxx + uyy) - uc * vc * vc + appctx->gamma * (1.0 - uc); in RHSFunction()
78 f[j][i].v = appctx->D2 * (vxx + vyy) + uc * vc * vc - (appctx->gamma + appctx->kappa) * vc; in RHSFunction()
94 AppCtx *appctx = (AppCtx *)ctx; /* user-defined application context */ in RHSJacobian() local
165 entries[0] = appctx->D1 * sy; in RHSJacobian()
168 entries[1] = appctx->D1 * sy; in RHSJacobian()
171 entries[2] = appctx->D1 * sx; in RHSJacobian()
174 entries[3] = appctx->D1 * sx; in RHSJacobian()
177 entries[4] = -2.0 * appctx->D1 * (sx + sy) - vc * vc - appctx->gamma; in RHSJacobian()
185 …if (appctx->aijpc) PetscCall(MatSetValuesStencil(BB, 1, &rowstencil, 6, stencil, entries, INSERT_V… in RHSJacobian()
187 entries[0] = appctx->D2 * sy; in RHSJacobian()
189 entries[1] = appctx->D2 * sy; in RHSJacobian()
191 entries[2] = appctx->D2 * sx; in RHSJacobian()
193 entries[3] = appctx->D2 * sx; in RHSJacobian()
195 entries[4] = -2.0 * appctx->D2 * (sx + sy) + 2.0 * uc * vc - appctx->gamma - appctx->kappa; in RHSJacobian()
201 …if (appctx->aijpc) PetscCall(MatSetValuesStencil(BB, 1, &rowstencil, 6, stencil, entries, INSERT_V… in RHSJacobian()
215 if (appctx->aijpc) { in RHSJacobian()
237 AppCtx *appctx = (AppCtx *)ptr; in IFunction() local
286 … f[j][i].u = udot[j][i].u - (appctx->D1 * (uxx + uyy) - uc * vc * vc + appctx->gamma * (1.0 - uc)); in IFunction()
287 …f[j][i].v = udot[j][i].v - (appctx->D2 * (vxx + vyy) + uc * vc * vc - (appctx->gamma + appctx->kap… in IFunction()
304 AppCtx *appctx = (AppCtx *)ctx; /* user-defined application context */ in IJacobian() local
375 entries[0] = -appctx->D1 * sy; in IJacobian()
378 entries[1] = -appctx->D1 * sy; in IJacobian()
381 entries[2] = -appctx->D1 * sx; in IJacobian()
384 entries[3] = -appctx->D1 * sx; in IJacobian()
387 entries[4] = 2.0 * appctx->D1 * (sx + sy) + vc * vc + appctx->gamma + a; in IJacobian()
395 …if (appctx->aijpc) PetscCall(MatSetValuesStencil(BB, 1, &rowstencil, 6, stencil, entries, INSERT_V… in IJacobian()
397 entries[0] = -appctx->D2 * sy; in IJacobian()
399 entries[1] = -appctx->D2 * sy; in IJacobian()
401 entries[2] = -appctx->D2 * sx; in IJacobian()
403 entries[3] = -appctx->D2 * sx; in IJacobian()
405 … entries[4] = 2.0 * appctx->D2 * (sx + sy) - 2.0 * uc * vc + appctx->gamma + appctx->kappa + a; in IJacobian()
411 …if (appctx->aijpc) PetscCall(MatSetValuesStencil(BB, 1, &rowstencil, 6, stencil, entries, INSERT_V… in IJacobian()
425 if (appctx->aijpc) { in IJacobian()