| /petsc/src/snes/tutorials/ |
| H A D | ex76.c | 352 …PetscErrorCode (*exactFuncs[3])(PetscInt dim, PetscReal time, const PetscReal x[], PetscInt Nf, Pe… in SetupProblem() local 366 exactFuncs[0] = quadratic_u; in SetupProblem() 367 exactFuncs[1] = linear_p; in SetupProblem() 368 exactFuncs[2] = linear_T; in SetupProblem() 374 exactFuncs[0] = cubic_u; in SetupProblem() 375 exactFuncs[1] = quadratic_p; in SetupProblem() 376 exactFuncs[2] = quadratic_T; in SetupProblem() 404 …ENTIAL, "top wall velocity", label, 1, &id, 0, 0, NULL, (PetscVoidFn *)exactFuncs[0], NULL, ctx, N… in SetupProblem() 406 …IAL, "bottom wall velocity", label, 1, &id, 0, 0, NULL, (PetscVoidFn *)exactFuncs[0], NULL, ctx, N… in SetupProblem() 408 …TIAL, "right wall velocity", label, 1, &id, 0, 0, NULL, (PetscVoidFn *)exactFuncs[0], NULL, ctx, N… in SetupProblem() [all …]
|
| H A D | ex12.c | 52 …PetscErrorCode (**exactFuncs)(PetscInt dim, PetscReal time, const PetscReal x[], PetscInt Nc, Pets… member 588 user->exactFuncs[0] = ball_u_2d; in SetupProblem() 591 user->exactFuncs[0] = cross_u_2d; in SetupProblem() 594 user->exactFuncs[0] = zero; in SetupProblem() 599 user->exactFuncs[0] = xytrig_u_2d; in SetupProblem() 601 user->exactFuncs[0] = xtrig_u_2d; in SetupProblem() 604 user->exactFuncs[0] = quadratic_u_2d; in SetupProblem() 618 user->exactFuncs[0] = ball_u_3d; in SetupProblem() 621 user->exactFuncs[0] = cross_u_3d; in SetupProblem() 624 user->exactFuncs[0] = quadratic_u_3d; in SetupProblem() [all …]
|
| H A D | ex62.c | 282 …PetscErrorCode (*exactFuncs[2])(PetscInt, PetscReal, const PetscReal[], PetscInt, PetscScalar *, v… in SetupEqn() local 292 exactFuncs[0] = quadratic_u; in SetupEqn() 293 exactFuncs[1] = quadratic_p; in SetupEqn() 297 exactFuncs[0] = trig_u; in SetupEqn() 298 exactFuncs[1] = trig_p; in SetupEqn() 310 PetscCall(PetscDSSetExactSolution(ds, 0, exactFuncs[0], user)); in SetupEqn() 311 PetscCall(PetscDSSetExactSolution(ds, 1, exactFuncs[1], user)); in SetupEqn() 314 …dm, DM_BC_ESSENTIAL, "wall", label, 1, &id, 0, 0, NULL, (PetscVoidFn *)exactFuncs[0], NULL, user, … in SetupEqn()
|
| H A D | ex71.c | 328 PetscSimplePointFn *exactFuncs[2]; in main() local 332 PetscCall(PetscDSGetExactSolution(ds, 0, &exactFuncs[0], &ctxs[0])); in main() 333 PetscCall(PetscDSGetExactSolution(ds, 1, &exactFuncs[1], &ctxs[1])); in main() 334 PetscCall(DMProjectFunction(dm, 0.0, exactFuncs, ctxs, INSERT_ALL_VALUES, u)); in main()
|
| /petsc/src/snes/tests/ |
| H A D | ex8.c | 406 …dm, PetscBool usePoly, PetscInt order, PetscInt dir, PetscErrorCode (**exactFuncs)(PetscInt, Petsc… in SetupFunctions() 415 exactFuncs[0] = constant; in SetupFunctions() 419 exactFuncs[0] = linear; in SetupFunctions() 423 exactFuncs[0] = quadratic; in SetupFunctions() 427 exactFuncs[0] = cubic; in SetupFunctions() 431 exactFuncs[0] = quartic; in SetupFunctions() 440 exactFuncs[0] = trig; in SetupFunctions() 446 static PetscErrorCode ComputeError(DM dm, PetscErrorCode (**exactFuncs)(PetscInt, PetscReal, const … in ComputeError() 454 PetscCall(DMProjectFunction(dm, 0.0, exactFuncs, exactCtxs, INSERT_ALL_VALUES, u)); in ComputeError() 457 PetscCall(DMComputeL2Diff(dm, 0.0, exactFuncs, exactCtxs, u, error)); in ComputeError() [all …]
|
| /petsc/src/ts/tutorials/ |
| H A D | ex76.c | 1179 …de UniformBoundaryConditions(DM dm, DMLabel label, PetscSimplePointFn *exactFuncs[], PetscSimplePo… in UniformBoundaryConditions() argument 1189 …TIAL, "top wall velocity", label, 1, &id, VEL, 0, NULL, (PetscVoidFn *)exactFuncs[VEL], (PetscVoid… in UniformBoundaryConditions() 1191 …L, "bottom wall velocity", label, 1, &id, VEL, 0, NULL, (PetscVoidFn *)exactFuncs[VEL], (PetscVoid… in UniformBoundaryConditions() 1193 …AL, "right wall velocity", label, 1, &id, VEL, 0, NULL, (PetscVoidFn *)exactFuncs[VEL], (PetscVoid… in UniformBoundaryConditions() 1195 …IAL, "left wall velocity", label, 1, &id, VEL, 0, NULL, (PetscVoidFn *)exactFuncs[VEL], (PetscVoid… in UniformBoundaryConditions() 1197 …SENTIAL, "top wall temp", label, 1, &id, TEMP, 0, NULL, (PetscVoidFn *)exactFuncs[TEMP], (PetscVoi… in UniformBoundaryConditions() 1199 …TIAL, "bottom wall temp", label, 1, &id, TEMP, 0, NULL, (PetscVoidFn *)exactFuncs[TEMP], (PetscVoi… in UniformBoundaryConditions() 1201 …NTIAL, "right wall temp", label, 1, &id, TEMP, 0, NULL, (PetscVoidFn *)exactFuncs[TEMP], (PetscVoi… in UniformBoundaryConditions() 1203 …ENTIAL, "left wall temp", label, 1, &id, TEMP, 0, NULL, (PetscVoidFn *)exactFuncs[TEMP], (PetscVoi… in UniformBoundaryConditions() 1209 PetscSimplePointFn *exactFuncs[3]; in SetupProblem() local [all …]
|
| H A D | ex77.c | 347 …PetscErrorCode (*exactFuncs[3])(PetscInt dim, PetscReal time, const PetscReal x[], PetscInt Nf, Pe… in SetupProblem() local 362 exactFuncs[0] = trig_trig_u; in SetupProblem() 363 exactFuncs[1] = trig_trig_p; in SetupProblem() 364 exactFuncs[2] = trig_trig_T; in SetupProblem() 396 …ENTIAL, "top wall velocity", label, 1, &id, 0, 0, NULL, (PetscVoidFn *)exactFuncs[0], (PetscVoidFn… in SetupProblem() 398 …IAL, "bottom wall velocity", label, 1, &id, 0, 0, NULL, (PetscVoidFn *)exactFuncs[0], (PetscVoidFn… in SetupProblem() 400 …TIAL, "right wall velocity", label, 1, &id, 0, 0, NULL, (PetscVoidFn *)exactFuncs[0], (PetscVoidFn… in SetupProblem() 402 …NTIAL, "left wall velocity", label, 1, &id, 0, 0, NULL, (PetscVoidFn *)exactFuncs[0], (PetscVoidFn… in SetupProblem() 404 …_ESSENTIAL, "top wall temp", label, 1, &id, 2, 0, NULL, (PetscVoidFn *)exactFuncs[2], (PetscVoidFn… in SetupProblem() 406 …SENTIAL, "bottom wall temp", label, 1, &id, 2, 0, NULL, (PetscVoidFn *)exactFuncs[2], (PetscVoidFn… in SetupProblem() [all …]
|
| H A D | ex18.c | 586 …PetscErrorCode (*exactFuncs[2])(PetscInt dim, PetscReal time, const PetscReal x[], PetscInt Nf, Pe… in SetupBC() local 624 exactFuncs[0] = user->initialGuess[0]; in SetupBC() 625 exactFuncs[1] = user->initialGuess[1]; in SetupBC() 630 exactFuncs[0] = zero_u_2d; in SetupBC() 633 exactFuncs[0] = constant_u_2d; in SetupBC() 640 exactFuncs[0] = doubly_periodic_u_2d; in SetupBC() 643 exactFuncs[0] = periodic_u_2d; in SetupBC() 648 exactFuncs[0] = quadratic_u_2d; in SetupBC() 653 exactFuncs[0] = shear_bc; in SetupBC() 666 if (user->velocityDist == VEL_CONSTANT && !isImplicit) user->initialGuess[0] = exactFuncs[0]; in SetupBC() [all …]
|
| /petsc/src/dm/impls/plex/tests/ |
| H A D | ex3.c | 725 static PetscErrorCode ComputeError(DM dm, PetscErrorCode (**exactFuncs)(PetscInt, PetscReal, const … in ComputeError() 733 PetscCall(DMProjectFunction(dm, 0.0, exactFuncs, exactCtxs, INSERT_ALL_VALUES, u)); in ComputeError() 736 PetscCall(DMComputeL2Diff(dm, 0.0, exactFuncs, exactCtxs, u, error)); in ComputeError() 744 …PetscErrorCode (*exactFuncs[1])(PetscInt dim, PetscReal time, const PetscReal x[], PetscInt Nf, Pe… in CheckFunctions() local 759 exactFuncs[0] = rt0; in CheckFunctions() 762 exactFuncs[0] = constant; in CheckFunctions() 768 exactFuncs[0] = rt1; in CheckFunctions() 771 exactFuncs[0] = linear; in CheckFunctions() 776 exactFuncs[0] = quadratic; in CheckFunctions() 780 exactFuncs[0] = cubic; in CheckFunctions() [all …]
|
| /petsc/src/tao/tutorials/ |
| H A D | ex1.c | 237 …PetscErrorCode (*exactFuncs[3])(PetscInt dim, PetscReal t, const PetscReal x[], PetscInt Nf, Petsc… in main() local 242 PetscCall(PetscDSGetExactSolution(ds, 0, &exactFuncs[0], NULL)); in main() 243 PetscCall(PetscDSGetExactSolution(ds, 1, &exactFuncs[1], NULL)); in main() 244 PetscCall(PetscDSGetExactSolution(ds, 2, &exactFuncs[2], NULL)); in main() 250 PetscCall(DMComputeL2Diff(dm, 0.0, exactFuncs, NULL, u, &error)); in main() 254 PetscCall(DMComputeL2Diff(dm, 0.0, exactFuncs, NULL, u, &error)); in main()
|
| H A D | ex2.c | 232 …PetscErrorCode (*exactFuncs[3])(PetscInt dim, PetscReal time, const PetscReal x[], PetscInt Nf, Pe… in main() local 237 PetscCall(PetscDSGetExactSolution(ds, 0, &exactFuncs[0], NULL)); in main() 238 PetscCall(PetscDSGetExactSolution(ds, 1, &exactFuncs[1], NULL)); in main() 239 PetscCall(PetscDSGetExactSolution(ds, 2, &exactFuncs[2], NULL)); in main() 245 PetscCall(DMComputeL2Diff(dm, 0.0, exactFuncs, NULL, u, &error)); in main() 249 PetscCall(DMComputeL2Diff(dm, 0.0, exactFuncs, NULL, u, &error)); in main()
|
| /petsc/src/ts/interface/ |
| H A D | tsmon.c | 1608 …PetscErrorCode (**exactFuncs)(PetscInt dim, PetscReal time, const PetscReal x[], PetscInt Nf, Pets… in TSMonitorError() local 1613 PetscCall(PetscMalloc2(Nf, &exactFuncs, Nf, &ctxs)); in TSMonitorError() 1614 for (f = 0; f < Nf; ++f) PetscCall(PetscDSGetExactSolution(ds, f, &exactFuncs[f], &ctxs[f])); in TSMonitorError() 1615 PetscCall(DMComputeL2FieldDiff(dm, ptime, exactFuncs, ctxs, u, ferrors)); in TSMonitorError() 1628 PetscCall(DMProjectFunction(dm, ptime, exactFuncs, ctxs, INSERT_ALL_VALUES, v)); in TSMonitorError() 1633 PetscCall(PetscFree2(exactFuncs, ctxs)); in TSMonitorError()
|