Home
last modified time | relevance | path

Searched refs:param (Results 1 – 25 of 42) sorted by relevance

12

/petsc/src/snes/tutorials/
H A Dex30.c103 Parameter *param; member
127 Parameter param; in main() local
147 PetscCall(SetParams(&param, &grid)); in main()
148 PetscCall(ReportParams(&param, &grid)); in main()
166 user->param = &param; in main()
214 Parameter *param = user->param; in UpdateSolution() local
230 if (param->ivisc == VISC_CONST && !param->stop_solve) { in UpdateSolution()
231 param->ivisc = VISC_CONST; in UpdateSolution()
238 if (param->stop_solve) goto done; in UpdateSolution()
242 if (param->ivisc >= VISC_DIFN && !param->stop_solve) { in UpdateSolution()
[all …]
H A Dex71.c70 Parameter *param = (Parameter *)ctx; in quadratic_u() local
71 PetscReal Delta = param->Delta; in quadratic_u()
72 PetscReal nu = param->nu; in quadratic_u()
73 PetscReal u_0 = param->u_0; in quadratic_u()
85 Parameter *param = (Parameter *)ctx; in linear_p() local
86 PetscReal Delta = param->Delta; in linear_p()
94 Parameter *param = (Parameter *)ctx; in wall_velocity() local
95 PetscReal u_0 = param->u_0; in wall_velocity()
191 Parameter *param; in CreateMesh() local
203 PetscCall(PetscBagGetData(user->bag, &param)); in CreateMesh()
[all …]
H A Dex34.c155 Parameter *param; in SetupPrimalProblem() local
166 PetscCall(PetscBagGetData(user->bag, &param)); in SetupPrimalProblem()
171 PetscCall(PetscDSSetLowerBound(ds, 0, obstacle_ball, param)); in SetupPrimalProblem()
185 constants[0] = param->r_0; // Ball radius in SetupPrimalProblem()
186 constants[1] = param->r_free; // Radius of the free boundary for the ball obstacle in SetupPrimalProblem()
187 constants[2] = param->A; // Logarithmic coefficient in exact ball solution in SetupPrimalProblem()
188 constants[3] = param->B; // Constant coefficient in exact ball solution in SetupPrimalProblem()
H A Dex5.c56 PetscReal param; /* test problem parameter */ member
82 lambda = user->param; in FormInitialGuess()
184 f[0] = 2 * x * (1 - x) + 2 * y * (1 - y) - user->param * PetscExpReal(x * (1 - x) * y * (1 - y)); in MMSForcing1()
202 …TSC_PI) * PetscSinReal(PETSC_PI * x) * PetscSinReal(PETSC_PI * y) - user->param * PetscExpReal(Pet… in MMSForcing2()
218 PetscReal m = user->m, n = user->n, lambda = user->param; in MMSForcing3()
241 …* (PetscSqr(Lx) - 6 * PetscSqr(x)) * (PetscSqr(y) - PetscSqr(Ly)) - user->param * PetscExpReal((Pe… in MMSForcing4()
258 lambda = user->param; in FormFunctionLocal()
327 lambda = user->param; in FormObjectiveLocal()
379 lambda = user->param; in FormJacobianLocal()
480 lambda = user->param; in FormFunctionMatlab()
[all …]
H A Dex55.c41 lambda = user->param; in FormInitialGuess()
139 f[0] = 2 * x * (1 - x) + 2 * y * (1 - y) - user->param * PetscExpReal(x * (1 - x) * y * (1 - y)); in MMSForcing1()
153 …TSC_PI) * PetscSinReal(PETSC_PI * x) * PetscSinReal(PETSC_PI * y) - user->param * PetscExpReal(Pet… in MMSForcing2()
167 PetscReal m = user->m, n = user->n, lambda = user->param; in MMSForcing3()
184 …* (PetscSqr(Lx) - 6 * PetscSqr(x)) * (PetscSqr(y) - PetscSqr(Ly)) - user->param * PetscExpReal((Pe… in MMSForcing4()
201 lambda = user->param; in FormFunctionLocal()
270 lambda = user->param; in FormObjectiveLocal()
322 lambda = user->param; in FormJacobianLocal()
424 lambda = user->param; in FormFunctionMatlab()
478 lambda = user->param; in NonlinearGS()
[all …]
H A Dex14.c45 PetscReal param; /* test problem parameter */ member
78 user.param = 6.0; in main()
79 PetscCall(PetscOptionsGetReal(NULL, NULL, "-par", &user.param, NULL)); in main()
80 …PetscCheck(user.param < bratu_lambda_max && user.param > bratu_lambda_min, PETSC_COMM_SELF, PETSC_… in main()
211 lambda = user->param; in FormInitialGuess()
282 lambda = user->param; in FormFunctionLocal()
398 lambda = user->param; in FormJacobian()
H A Dex27.c110 PetscBag param; member
354 Parameter *param; in SetupParameters() local
357 PetscCall(PetscBagGetData(bag, &param)); in SetupParameters()
359 PetscCall(PetscBagRegisterReal(bag, &param->k, 1.0, "k", "Thermal conductivity")); in SetupParameters()
380 Parameter *param; in SetupPrimalProblem() local
459 PetscCall(PetscBagGetData(user->param, &param)); in SetupPrimalProblem()
462 constants[0] = param->k; in SetupPrimalProblem()
504 Parameter *param; in SetupMixedProblem() local
592 PetscCall(PetscBagGetData(user->param, &param)); in SetupMixedProblem()
595 constants[0] = param->k; in SetupMixedProblem()
[all …]
H A Dex76.c322 Parameter *param; in CreateMesh() local
334 PetscCall(PetscBagGetData(user->bag, &param)); in CreateMesh()
335 theta = param->theta; in CreateMesh()
391 Parameter *param; in SetupProblem() local
394 PetscCall(PetscBagGetData(user->bag, &param)); in SetupProblem()
396 constants[0] = param->nu; in SetupProblem()
397 constants[1] = param->alpha; in SetupProblem()
398 constants[2] = param->theta; in SetupProblem()
431 Parameter *param; in SetupDiscretization() local
458 PetscCall(PetscBagGetData(user->bag, &param)); in SetupDiscretization()
[all …]
H A Dex17.c211 Parameter *param; in axial_disp_u() local
213 PetscCall(PetscBagGetData(user->bag, &param)); in axial_disp_u()
215 const PetscReal mu = PetscRealPart(param->mu); in axial_disp_u()
216 const PetscReal lambda = PetscRealPart(param->lambda); in axial_disp_u()
217 const PetscReal N = PetscRealPart(param->N); in axial_disp_u()
454 Parameter *param; in SetupPrimalProblem() local
465 PetscCall(PetscBagGetData(user->bag, &param)); in SetupPrimalProblem()
593 constants[0] = param->mu; /* shear modulus, Pa */ in SetupPrimalProblem()
594 constants[1] = param->lambda; /* Lame's first parameter, Pa */ in SetupPrimalProblem()
595 constants[2] = param->N; /* Tension on right wall, Pa */ in SetupPrimalProblem()
H A Dex55.h11 PetscReal param; /* test problem parameter */ member
/petsc/src/ts/tutorials/
H A Dex50.c68 PetscParam param; member
98 appctx.param.N = 10; /* order of the spectral element */ in main()
99 appctx.param.E = 10; /* number of elements */ in main()
100 appctx.param.L = 4.0; /* length of the domain */ in main()
101 appctx.param.mu = 0.01; /* diffusion coefficient */ in main()
103 appctx.param.steps = PETSC_INT_MAX; in main()
104 appctx.param.Tend = 4; in main()
106 PetscCall(PetscOptionsGetInt(NULL, NULL, "-N", &appctx.param.N, NULL)); in main()
107 PetscCall(PetscOptionsGetInt(NULL, NULL, "-E", &appctx.param.E, NULL)); in main()
108 PetscCall(PetscOptionsGetReal(NULL, NULL, "-Tend", &appctx.param.Tend, NULL)); in main()
[all …]
H A Dex53.c376 Parameter *param; in terzaghi_drainage_pressure() local
378 PetscCall(PetscBagGetData(user->bag, &param)); in terzaghi_drainage_pressure()
380 PetscScalar alpha = param->alpha; /* - */ in terzaghi_drainage_pressure()
381 PetscScalar K_u = param->K_u; /* Pa */ in terzaghi_drainage_pressure()
382 PetscScalar M = param->M; /* Pa */ in terzaghi_drainage_pressure()
383 PetscScalar G = param->mu; /* Pa */ in terzaghi_drainage_pressure()
384 PetscScalar P_0 = param->P_0; /* Pa */ in terzaghi_drainage_pressure()
399 Parameter *param; in terzaghi_initial_u() local
401 PetscCall(PetscBagGetData(user->bag, &param)); in terzaghi_initial_u()
403 PetscScalar K_u = param->K_u; /* Pa */ in terzaghi_initial_u()
[all …]
H A Dex1f.F9040 PetscInt, parameter :: param = 1, lmx = 2, lmy = 3
46 lambda = user(param)
95 PetscInt, parameter :: param = 1, lmx = 2, lmy = 3
105 lambda = user(param)
153 PetscInt, parameter :: param = 1, lmx = 2, lmy = 3
159 lambda = user(param)
192 PetscInt, parameter :: param = 1, lmx = 2, lmy = 3
214 user(param) = 6.0
223 …PetscCallA(PetscOptionsGetReal(PETSC_NULL_OPTIONS, PETSC_NULL_CHARACTER, '-param', user(param), fl…
224 if (user(param) >= param_max .or. user(param) <= param_min) then
H A Dex1.c32 PetscReal param; /* test problem parameter */ member
60 user.param = 6.0; in main()
69 PetscCall(PetscOptionsGetReal(NULL, NULL, "-param", &user.param, NULL)); in main()
70 …PetscCheck(user.param < param_max && user.param >= param_min, PETSC_COMM_WORLD, PETSC_ERR_ARG_OUTO… in main()
189 lambda = user->param; in FormInitialGuess()
224 lambda = user->param; in FormFunction()
276 lambda = user->param; in FormJacobian()
H A Dex76.c530 Parameter *param = (Parameter *)ctx; in pipe_u() local
532 u[0] = (0.5 * param->Reynolds / param->mu) * X[1] * (1.0 - X[1]); in pipe_u()
556 Parameter *param = (Parameter *)ctx; in pipe_T() local
558 T[0] = X[1] * (1.0 - X[1]) + param->T_in; in pipe_T()
646 Parameter *param = (Parameter *)ctx; in pipe_wiggly_u() local
648 …u[0] = (0.5 * param->Reynolds / param->mu) * (X[1] * (1.0 - X[1]) + param->epsilon * PetscSinReal(… in pipe_wiggly_u()
672 Parameter *param = (Parameter *)ctx; in pipe_wiggly_T() local
674 T[0] = X[1] * (1.0 - X[1]) + param->epsilon * PetscSinReal(PETSC_PI * X[1]) + param->T_in; in pipe_wiggly_T()
1389 Parameter *param; in SetupProblem() local
1392 PetscCall(PetscBagGetData(user->bag, &param)); in SetupProblem()
[all …]
/petsc/src/tao/unconstrained/tutorials/
H A Dspectraladjointassimilation.c84 PetscParam param; member
122 appctx.param.N = 10; /* order of the spectral element */ in main()
123 appctx.param.E = 8; /* number of elements */ in main()
124 appctx.param.L = 1.0; /* length of the domain */ in main()
125 appctx.param.mu = 0.00001; /* diffusion coefficient */ in main()
126 appctx.param.a = 0.0; /* advection speed */ in main()
128 appctx.param.steps = PETSC_INT_MAX; in main()
129 appctx.param.Tend = 0.01; in main()
132 PetscCall(PetscOptionsGetInt(NULL, NULL, "-N", &appctx.param.N, NULL)); in main()
133 PetscCall(PetscOptionsGetInt(NULL, NULL, "-E", &appctx.param.E, NULL)); in main()
[all …]
H A Dburgers_spectral.c76 PetscParam param; member
112 appctx.param.N = 10; /* order of the spectral element */ in main()
113 appctx.param.E = 10; /* number of elements */ in main()
114 appctx.param.L = 4.0; /* length of the domain */ in main()
115 appctx.param.mu = 0.01; /* diffusion coefficient */ in main()
117 appctx.param.steps = PETSC_INT_MAX; in main()
118 appctx.param.Tend = 4; in main()
120 PetscCall(PetscOptionsGetInt(NULL, NULL, "-N", &appctx.param.N, NULL)); in main()
121 PetscCall(PetscOptionsGetInt(NULL, NULL, "-E", &appctx.param.E, NULL)); in main()
122 PetscCall(PetscOptionsGetReal(NULL, NULL, "-Tend", &appctx.param.Tend, NULL)); in main()
[all …]
/petsc/src/binding/petsc4py/demo/legacy/wrap-f2py/
H A DBratu2D.pyf11 subroutine FormInitGuess(dm, x, param, ierr)
15 real(kind=8) param
19 subroutine FormFunction(dm, x, f, param, ierr)
24 real(kind=8) param
28 subroutine FormJacobian(dm, x, J, param, ierr)
33 real(kind=8) param
/petsc/src/ts/tutorials/eimex/
H A Dallen_cahn.c16 PetscReal param; /* parameter */ member
40 user.param = 9e-4; in main()
44 PetscCall(PetscOptionsReal("-eps", "parameter", "", user.param, &user.param, NULL)); in main()
92 …C_COMM_WORLD, "eps %g, steps %" PetscInt_FMT ", ftime %g\n", (double)user.param, steps, (double)ft… in main()
115 eps = user->param; in RHSFunction()
187 x[i] = PetscTanhReal((x_map - 0.8) / (2. * PetscSqrtReal(user->param))); in FormInitialSolution()
189 x[i] = PetscTanhReal((0.613 - x_map) / (2. * PetscSqrtReal(user->param))); in FormInitialSolution()
191 x[i] = PetscTanhReal((x_map - 0.36) / (2. * PetscSqrtReal(user->param))); in FormInitialSolution()
193 x[i] = PetscTanhReal((0.2 - x_map) / (2. * PetscSqrtReal(user->param))); in FormInitialSolution()
195 x[i] = PetscTanhReal((x_map + 0.9) / (2. * PetscSqrtReal(user->param))); in FormInitialSolution()
/petsc/lib/petsc/bin/maint/abi-compliance-checker/modules/Internals/
H A DRegTests.pm2648 $DECL_SPEC int funcParameterBaseType(int *param);";
2650 int funcParameterBaseType(int *param) { return sizeof(*param); }";
2653 $DECL_SPEC int funcParameterBaseType(long long *param);";
2655 int funcParameterBaseType(long long *param) { return sizeof(*param); }";
2664 $DECL_SPEC long long funcParameterPointerLevelAndSize(long long *param);";
2666 long long funcParameterPointerLevelAndSize(long long *param) { return param[5]; }";
2670 $DECL_SPEC int funcParameterPointerLevel(int *param);";
2672 int funcParameterPointerLevel(int *param) { return param[5]; }";
2675 $DECL_SPEC int funcParameterPointerLevel(int **param);";
2677 int funcParameterPointerLevel(int **param) { return param[5][5]; }";
[all …]
/petsc/src/ksp/ksp/tests/
H A Dex14.c61 PetscReal param; /* test problem parameter */ member
107 user.param = 6.0; in main()
111 PetscCall(PetscOptionsGetReal(NULL, NULL, "-par", &user.param, NULL)); in main()
112 …PetscCheck(user.param < bratu_lambda_max && user.param > bratu_lambda_min, PETSC_COMM_WORLD, PETSC… in main()
285 lambda = user->param; in FormInitialGuess()
350 lambda = user->param; in ComputeFunction()
433 lambda = user->param; in ComputeJacobian()
/petsc/src/snes/tests/
H A Dex1.c45 PetscReal param; /* test problem parameter */ member
85 user.param = 6.0; in main()
88 PetscCall(PetscOptionsGetReal(NULL, NULL, "-par", &user.param, NULL)); in main()
90 …PetscCheck(user.param < bratu_lambda_max && user.param > bratu_lambda_min, PETSC_COMM_SELF, PETSC_… in main()
323 lambda = user->param; in FormInitialGuess()
378 lambda = user->param; in FormFunction()
444 lambda = user->param; in FormJacobian()
/petsc/src/sys/tests/linter/output/
H A DtestValidFunctionDocStrings.patch230 + nonExistentParam - this param does not exist
236 + nonExistentParam - this param does not exist
241 -+ nonExistentParam - this param does not exist
242 +. nonExistentParam - this param does not exist
247 + nonExistentParam - this param does not exist
487 + foo - the input description for an in-out param
493 + foo - the input description for an in-out param
504 - foo - the output description for an in-out param
509 -- foo - the output description for an in-out param
510 +. foo - the output description for an in-out param
/petsc/src/ts/tutorials/hamiltonian/
H A Dex3.c577 …rorCode InitializeWeights(DM sw, PetscReal totalWeight, PetscProbFn *func, const PetscReal param[]) in InitializeWeights() argument
629 PetscCall((*func)(xqr, param, &xden)); in InitializeWeights()
725 Parameter *param; in InitializeConstants() local
728 PetscCall(PetscBagGetData(user->bag, (void **)&param)); in InitializeConstants()
745 param->sigma = PetscAbsReal(global_charge / (Area)); in InitializeConstants()
747 PetscCall(PetscPrintf(PETSC_COMM_WORLD, "sigma: %g\n", (double)param->sigma)); in InitializeConstants()
748 …%e)\n", (double)param->x0, (double)param->v0, (double)param->t0, (double)param->m0, (double)param-… in InitializeConstants()
749 (double)param->vlasovNumber)); in InitializeConstants()
754 Parameter *param; in InitializeConstants() local
755 PetscCall(PetscBagGetData(user->bag, (void **)&param)); in InitializeConstants()
[all …]
/petsc/src/ksp/ksp/tutorials/
H A Dex13f90.F9021 common/param/hx2, hy2
78 common/param/hx2, hy2
250 common/param/hx2, hy2

12