Lines Matching refs:appctx
47 AppCtx appctx; in main() local
55 appctx.epsilon = 1.0e-3; in main()
56 appctx.delta = 1.0; in main()
57 appctx.alpha = 10.0; in main()
58 appctx.beta = 4.0; in main()
59 appctx.gamma = 1.0; in main()
60 appctx.kappa = .75; in main()
61 appctx.lambda = 1.0; in main()
62 appctx.mu = 100.; in main()
63 appctx.cstar = .2; in main()
64 appctx.upwind = PETSC_TRUE; in main()
66 PetscCall(PetscOptionsGetScalar(NULL, NULL, "-delta", &appctx.delta, NULL)); in main()
67 PetscCall(PetscOptionsGetBool(NULL, NULL, "-upwind", &appctx.upwind, NULL)); in main()
91 PetscCall(TSSetIFunction(ts, NULL, IFunction, &appctx)); in main()
137 AppCtx *appctx = (AppCtx *)ptr; in IFunction() local
195 if (!appctx->upwind) { in IFunction()
198 kcxrhox = appctx->kappa * (cxx * rho + cx * rhox); in IFunction()
200 …kcxrhox = appctx->kappa * ((u[i + 1].c - u[i].c) * u[i + 1].rho - (u[i].c - u[i - 1].c) * u[i].rho… in IFunction()
203 ….rho - appctx->epsilon * rhoxx + kcxrhox - appctx->mu * PetscAbsScalar(rho) * (1.0 - rho) * PetscM… in IFunction()
204 …f[i].c = udot[i].c - appctx->delta * cxx + appctx->lambda * c + appctx->alpha * rho * c / (appct… in IFunction()