| /petsc/src/snes/tutorials/ |
| H A D | ex55k.kokkos.cxx | 63 PetscScalar u, ue, uw, un, us, uxx, uyy, mms_solution, mms_forcing; in FormFunctionLocalVec()
73 ue = xv(j, i + 1); in FormFunctionLocalVec()
86 static_cast<void>(MMSSolution1(user, &c, &ue)); in FormFunctionLocalVec()
99 uxx = (2.0 * u - uw - ue) * hydhx; in FormFunctionLocalVec()
142 PetscScalar u, ue, uw, un, us, uxux, uyuy; in FormObjectiveLocalVec()
148 ue = xv(j, i + 1); in FormObjectiveLocalVec()
153 if (i + 1 == mx - 1) ue = 0.; in FormObjectiveLocalVec()
159 uxux = u * (2. * u - ue - uw) * hydhx; in FormObjectiveLocalVec()
|
| H A D | ex5.c | 254 PetscScalar u, ue, uw, un, us, uxx, uyy, mms_solution, mms_forcing; in FormFunctionLocal() local
276 ue = x[j][i + 1]; in FormFunctionLocal()
289 PetscCall(user->mms_solution(user, &c, &ue)); in FormFunctionLocal()
302 uxx = (2.0 * u - uw - ue) * hydhx; in FormFunctionLocal()
321 PetscScalar u, ue, uw, un, us, uxux, uyuy; in FormObjectiveLocal() local
343 ue = x[j][i + 1]; in FormObjectiveLocal()
348 if (i + 1 == info->mx - 1) ue = 0.; in FormObjectiveLocal()
354 uxux = u * (2. * u - ue - uw) * hydhx; in FormObjectiveLocal()
519 PetscScalar **x, **b, bij, F, F0 = 0, J, u, un, us, ue, eu, uw, uxx, uyy, y; in NonlinearGS() local
578 ue = x[j][i - 1]; in NonlinearGS()
[all …]
|
| H A D | ex55.c | 197 PetscScalar u, ue, uw, un, us, uxx, uyy, mms_solution, mms_forcing; in FormFunctionLocal() local
219 ue = x[j][i + 1]; in FormFunctionLocal()
232 PetscCall(user->mms_solution(user, &c, &ue)); in FormFunctionLocal()
245 uxx = (2.0 * u - uw - ue) * hydhx; in FormFunctionLocal()
264 PetscScalar u, ue, uw, un, us, uxux, uyuy; in FormObjectiveLocal() local
286 ue = x[j][i + 1]; in FormObjectiveLocal()
291 if (i + 1 == info->mx - 1) ue = 0.; in FormObjectiveLocal()
297 uxux = u * (2. * u - ue - uw) * hydhx; in FormObjectiveLocal()
463 PetscScalar **x, **b, bij, F, F0 = 0, J, u, un, us, ue, eu, uw, uxx, uyy, y; in NonlinearGS() local
522 ue = x[j][i - 1]; in NonlinearGS()
[all …]
|
| H A D | ex9.c | 168 PetscReal dx, dy, x, y, ue, un, us, uw; in FormFunctionLocal() local
181 ue = (i + 1 == info->mx - 1) ? u_exact(x + dx, y) : au[j][i + 1]; in FormFunctionLocal()
184 af[j][i] = -(dy / dx) * (uw - 2.0 * au[j][i] + ue) - (dx / dy) * (us - 2.0 * au[j][i] + un); in FormFunctionLocal()
|
| /petsc/src/ts/tests/ |
| H A D | ex21.c | 38 PetscScalar ut, u, ue, uw, un, us, uxx, uyy; in FormIFunctionLocal() local
58 ue = x[j][i + 1]; in FormIFunctionLocal()
62 uxx = (uw - 2.0 * u + ue) / (hx * hx); in FormIFunctionLocal()
|
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex51.c | 32 PetscScalar *r, *ue, val; in main() local
80 PetscCall(PetscMalloc1(num2Dnodes, &ue)); in main()
133 PetscCall(FormNodalSoln(p, x, y, h, gllNode, ue)); in main()
135 PetscCall(VecSetValues(ustar, num2Dnodes, idx, ue, INSERT_VALUES)); in main()
144 PetscCall(PetscFree(ue)); in main()
|