Lines Matching refs:C_FIELD_ID
37 C_FIELD_ID = 0, enumerator
156 const PetscScalar C00 = split ? a[aOff[C_FIELD_ID]] : u[uOff[C_FIELD_ID]]; in C_0()
157 const PetscScalar C01 = split ? a[aOff[C_FIELD_ID] + 1] : u[uOff[C_FIELD_ID] + 1]; in C_0()
158 const PetscScalar C11 = split ? a[aOff[C_FIELD_ID] + 2] : u[uOff[C_FIELD_ID] + 2]; in C_0()
164 … 0; k < 3; k++) f0[k] = eqss[k] * (u_t[uOff[C_FIELD_ID] + k] - outerp[k] + alpha * fnorm * u[uOff[… in C_0()
176 const PetscScalar C00 = split ? a[aOff[C_FIELD_ID]] : u[uOff[C_FIELD_ID]]; in C_0_3d()
177 const PetscScalar C01 = split ? a[aOff[C_FIELD_ID] + 1] : u[uOff[C_FIELD_ID] + 1]; in C_0_3d()
178 const PetscScalar C02 = split ? a[aOff[C_FIELD_ID] + 2] : u[uOff[C_FIELD_ID] + 2]; in C_0_3d()
179 const PetscScalar C11 = split ? a[aOff[C_FIELD_ID] + 3] : u[uOff[C_FIELD_ID] + 3]; in C_0_3d()
180 const PetscScalar C12 = split ? a[aOff[C_FIELD_ID] + 4] : u[uOff[C_FIELD_ID] + 4]; in C_0_3d()
181 const PetscScalar C22 = split ? a[aOff[C_FIELD_ID] + 5] : u[uOff[C_FIELD_ID] + 5]; in C_0_3d()
187 … 0; k < 6; k++) f0[k] = eqss[k] * (u_t[uOff[C_FIELD_ID] + k] - outerp[k] + alpha * fnorm * u[uOff[… in C_0_3d()
197 const PetscScalar C00 = split ? a[aOff[C_FIELD_ID]] : u[uOff[C_FIELD_ID]]; in JC_0_c0c0()
198 const PetscScalar C01 = split ? a[aOff[C_FIELD_ID] + 1] : u[uOff[C_FIELD_ID] + 1]; in JC_0_c0c0()
199 const PetscScalar C11 = split ? a[aOff[C_FIELD_ID] + 2] : u[uOff[C_FIELD_ID] + 2]; in JC_0_c0c0()
209 …Int j = 0; j < 3; j++) J[k * 3 + j] = eqss[k] * (alpha * dfnorm * dC[j] * u[uOff[C_FIELD_ID] + k]); in JC_0_c0c0()
221 const PetscScalar C00 = split ? a[aOff[C_FIELD_ID]] : u[uOff[C_FIELD_ID]]; in JC_0_c0c0_3d()
222 const PetscScalar C01 = split ? a[aOff[C_FIELD_ID] + 1] : u[uOff[C_FIELD_ID] + 1]; in JC_0_c0c0_3d()
223 const PetscScalar C02 = split ? a[aOff[C_FIELD_ID] + 2] : u[uOff[C_FIELD_ID] + 2]; in JC_0_c0c0_3d()
224 const PetscScalar C11 = split ? a[aOff[C_FIELD_ID] + 3] : u[uOff[C_FIELD_ID] + 3]; in JC_0_c0c0_3d()
225 const PetscScalar C12 = split ? a[aOff[C_FIELD_ID] + 4] : u[uOff[C_FIELD_ID] + 4]; in JC_0_c0c0_3d()
226 const PetscScalar C22 = split ? a[aOff[C_FIELD_ID] + 5] : u[uOff[C_FIELD_ID] + 5]; in JC_0_c0c0_3d()
236 …Int j = 0; j < 6; j++) J[k * 6 + j] = eqss[k] * (alpha * dfnorm * dC[j] * u[uOff[C_FIELD_ID] + k]); in JC_0_c0c0_3d()
293 …for (PetscInt d = 0; d < 2; d++) f1[k * 2 + d] = PetscSqr(D) * u_x[uOff_x[C_FIELD_ID] + k * 2 + d]; in C_1()
300 …for (PetscInt d = 0; d < 3; d++) f1[k * 3 + d] = PetscSqr(D) * u_x[uOff_x[C_FIELD_ID] + k * 3 + d]; in C_1_3d()
340 const PetscScalar C00 = u[uOff[C_FIELD_ID]] + r; in P_1()
341 const PetscScalar C01 = u[uOff[C_FIELD_ID] + 1]; in P_1()
343 const PetscScalar C11 = u[uOff[C_FIELD_ID] + 2] + r; in P_1()
355 const PetscScalar C00 = u[uOff[C_FIELD_ID]] + r; in P_1_3d()
356 const PetscScalar C01 = u[uOff[C_FIELD_ID] + 1]; in P_1_3d()
357 const PetscScalar C02 = u[uOff[C_FIELD_ID] + 2]; in P_1_3d()
359 const PetscScalar C11 = u[uOff[C_FIELD_ID] + 3] + r; in P_1_3d()
360 const PetscScalar C12 = u[uOff[C_FIELD_ID] + 4]; in P_1_3d()
363 const PetscScalar C22 = u[uOff[C_FIELD_ID] + 5] + r; in P_1_3d()
377 const PetscScalar C00 = a[aOff[C_FIELD_ID]] + r; in P_1_aux()
378 const PetscScalar C01 = a[aOff[C_FIELD_ID] + 1]; in P_1_aux()
380 const PetscScalar C11 = a[aOff[C_FIELD_ID] + 2] + r; in P_1_aux()
392 const PetscScalar C00 = a[aOff[C_FIELD_ID]] + r; in P_1_aux_3d()
393 const PetscScalar C01 = a[aOff[C_FIELD_ID] + 1]; in P_1_aux_3d()
394 const PetscScalar C02 = a[aOff[C_FIELD_ID] + 2]; in P_1_aux_3d()
396 const PetscScalar C11 = a[aOff[C_FIELD_ID] + 3] + r; in P_1_aux_3d()
397 const PetscScalar C12 = a[aOff[C_FIELD_ID] + 4]; in P_1_aux_3d()
400 const PetscScalar C22 = a[aOff[C_FIELD_ID] + 5] + r; in P_1_aux_3d()
414 const PetscScalar C00 = u[uOff[C_FIELD_ID]] + r; in JP_1_p1p1()
415 const PetscScalar C01 = u[uOff[C_FIELD_ID] + 1]; in JP_1_p1p1()
417 const PetscScalar C11 = u[uOff[C_FIELD_ID] + 2] + r; in JP_1_p1p1()
430 const PetscScalar C00 = u[uOff[C_FIELD_ID]] + r; in JP_1_p1p1_3d()
431 const PetscScalar C01 = u[uOff[C_FIELD_ID] + 1]; in JP_1_p1p1_3d()
432 const PetscScalar C02 = u[uOff[C_FIELD_ID] + 2]; in JP_1_p1p1_3d()
434 const PetscScalar C11 = u[uOff[C_FIELD_ID] + 3] + r; in JP_1_p1p1_3d()
435 const PetscScalar C12 = u[uOff[C_FIELD_ID] + 4]; in JP_1_p1p1_3d()
438 const PetscScalar C22 = u[uOff[C_FIELD_ID] + 5] + r; in JP_1_p1p1_3d()
456 const PetscScalar C00 = a[aOff[C_FIELD_ID]] + r; in JP_1_p1p1_aux()
457 const PetscScalar C01 = a[aOff[C_FIELD_ID] + 1]; in JP_1_p1p1_aux()
459 const PetscScalar C11 = a[aOff[C_FIELD_ID] + 2] + r; in JP_1_p1p1_aux()
472 const PetscScalar C00 = a[aOff[C_FIELD_ID]] + r; in JP_1_p1p1_aux_3d()
473 const PetscScalar C01 = a[aOff[C_FIELD_ID] + 1]; in JP_1_p1p1_aux_3d()
474 const PetscScalar C02 = a[aOff[C_FIELD_ID] + 2]; in JP_1_p1p1_aux_3d()
476 const PetscScalar C11 = a[aOff[C_FIELD_ID] + 3] + r; in JP_1_p1p1_aux_3d()
477 const PetscScalar C12 = a[aOff[C_FIELD_ID] + 4]; in JP_1_p1p1_aux_3d()
480 const PetscScalar C22 = a[aOff[C_FIELD_ID] + 5] + r; in JP_1_p1p1_aux_3d()
619 const PetscScalar C00 = u[uOff[C_FIELD_ID]]; in energy()
620 const PetscScalar C01 = u[uOff[C_FIELD_ID] + 1]; in energy()
622 const PetscScalar C11 = u[uOff[C_FIELD_ID] + 2]; in energy()
624 const PetscScalar *gradC00 = u_x + uOff_x[C_FIELD_ID]; in energy()
625 const PetscScalar *gradC01 = u_x + uOff_x[C_FIELD_ID] + 2; in energy()
626 const PetscScalar *gradC11 = u_x + uOff_x[C_FIELD_ID] + 4; in energy()
637 const PetscScalar C00 = u[uOff[C_FIELD_ID]]; in energy()
638 const PetscScalar C01 = u[uOff[C_FIELD_ID] + 1]; in energy()
639 const PetscScalar C02 = u[uOff[C_FIELD_ID] + 2]; in energy()
641 const PetscScalar C11 = u[uOff[C_FIELD_ID] + 3]; in energy()
642 const PetscScalar C12 = u[uOff[C_FIELD_ID] + 4]; in energy()
645 const PetscScalar C22 = u[uOff[C_FIELD_ID] + 5]; in energy()
647 const PetscScalar *gradC00 = u_x + uOff_x[C_FIELD_ID]; in energy()
648 const PetscScalar *gradC01 = u_x + uOff_x[C_FIELD_ID] + 3; in energy()
649 const PetscScalar *gradC02 = u_x + uOff_x[C_FIELD_ID] + 6; in energy()
650 const PetscScalar *gradC11 = u_x + uOff_x[C_FIELD_ID] + 9; in energy()
651 const PetscScalar *gradC12 = u_x + uOff_x[C_FIELD_ID] + 12; in energy()
652 const PetscScalar *gradC22 = u_x + uOff_x[C_FIELD_ID] + 15; in energy()
674 C00 = u[uOff[C_FIELD_ID]] + r; in ellipticity_fail_private()
675 C01 = u[uOff[C_FIELD_ID] + 1]; in ellipticity_fail_private()
676 C11 = u[uOff[C_FIELD_ID] + 2] + r; in ellipticity_fail_private()
678 C00 = u[uOff[C_FIELD_ID]] + r; in ellipticity_fail_private()
679 C01 = u[uOff[C_FIELD_ID] + 1]; in ellipticity_fail_private()
680 C02 = u[uOff[C_FIELD_ID] + 2]; in ellipticity_fail_private()
681 C11 = u[uOff[C_FIELD_ID] + 3] + r; in ellipticity_fail_private()
682 C12 = u[uOff[C_FIELD_ID] + 4]; in ellipticity_fail_private()
683 C22 = u[uOff[C_FIELD_ID] + 5] + r; in ellipticity_fail_private()
786 const PetscScalar C00 = u[uOff[C_FIELD_ID]] + r; in flux()
787 const PetscScalar C01 = u[uOff[C_FIELD_ID] + 1]; in flux()
789 const PetscScalar C11 = u[uOff[C_FIELD_ID] + 2] + r; in flux()
794 const PetscScalar C00 = u[uOff[C_FIELD_ID]] + r; in flux()
795 const PetscScalar C01 = u[uOff[C_FIELD_ID] + 1]; in flux()
796 const PetscScalar C02 = u[uOff[C_FIELD_ID] + 2]; in flux()
798 const PetscScalar C11 = u[uOff[C_FIELD_ID] + 3] + r; in flux()
799 const PetscScalar C12 = u[uOff[C_FIELD_ID] + 4]; in flux()
802 const PetscScalar C22 = u[uOff[C_FIELD_ID] + 5] + r; in flux()
814 const PetscScalar C00 = u[uOff[C_FIELD_ID]]; in normc()
815 const PetscScalar C01 = u[uOff[C_FIELD_ID] + 1]; in normc()
816 const PetscScalar C11 = u[uOff[C_FIELD_ID] + 2]; in normc()
820 const PetscScalar C00 = u[uOff[C_FIELD_ID]]; in normc()
821 const PetscScalar C01 = u[uOff[C_FIELD_ID] + 1]; in normc()
822 const PetscScalar C02 = u[uOff[C_FIELD_ID] + 2]; in normc()
823 const PetscScalar C11 = u[uOff[C_FIELD_ID] + 3]; in normc()
824 const PetscScalar C12 = u[uOff[C_FIELD_ID] + 4]; in normc()
825 const PetscScalar C22 = u[uOff[C_FIELD_ID] + 5]; in normc()
838 C00 = u[uOff[C_FIELD_ID]]; in eigsc()
839 C01 = u[uOff[C_FIELD_ID] + 1]; in eigsc()
840 C11 = u[uOff[C_FIELD_ID] + 2]; in eigsc()
842 C00 = u[uOff[C_FIELD_ID]]; in eigsc()
843 C01 = u[uOff[C_FIELD_ID] + 1]; in eigsc()
844 C02 = u[uOff[C_FIELD_ID] + 2]; in eigsc()
845 C11 = u[uOff[C_FIELD_ID] + 3]; in eigsc()
846 C12 = u[uOff[C_FIELD_ID] + 4]; in eigsc()
847 C22 = u[uOff[C_FIELD_ID] + 5]; in eigsc()
1333 funcs[C_FIELD_ID] = zerof; in ProjectAuxDM()
1334 ctxs[C_FIELD_ID] = NULL; in ProjectAuxDM()
1341 PetscCall(PetscDSSetObjective(ds, C_FIELD_ID, zero)); in ProjectAuxDM()
1436 PetscCall(PetscDSSetObjective(ds, C_FIELD_ID, jacobian_fail)); in DMPlexTSComputeIFunctionFEM_Private()
1438 PetscCall(PetscDSSetObjective(ds, C_FIELD_ID, energy)); in DMPlexTSComputeIFunctionFEM_Private()
1439 if (vals[C_FIELD_ID]) PetscCall(SNESSetFunctionDomainError(ctx->snes)); in DMPlexTSComputeIFunctionFEM_Private()
1483 PetscInt fields[NUM_FIELDS] = {C_FIELD_ID, P_FIELD_ID}; in SetupProblem()
1503 PetscCall(PetscDSSetImplicit(ds, C_FIELD_ID, PETSC_TRUE)); in SetupProblem()
1505 PetscCall(PetscDSSetObjective(ds, C_FIELD_ID, energy)); in SetupProblem()
1508 PetscCall(PetscDSSetResidual(ds, C_FIELD_ID, C_0, C_1)); in SetupProblem()
1510 …PetscCall(PetscDSSetJacobian(ds, C_FIELD_ID, C_FIELD_ID, JC_0_c0c0, NULL, NULL, ctx->D > 0 ? JC_1_… in SetupProblem()
1512 PetscCall(PetscDSSetJacobian(ds, C_FIELD_ID, P_FIELD_ID, NULL, JC_0_c0p1, NULL, NULL)); in SetupProblem()
1513 PetscCall(PetscDSSetJacobian(ds, P_FIELD_ID, C_FIELD_ID, NULL, NULL, JP_1_p1c0, NULL)); in SetupProblem()
1517 PetscCall(PetscDSSetResidual(ds, C_FIELD_ID, C_0_3d, C_1_3d)); in SetupProblem()
1519 …PetscCall(PetscDSSetJacobian(ds, C_FIELD_ID, C_FIELD_ID, JC_0_c0c0_3d, NULL, NULL, ctx->D > 0 ? JC… in SetupProblem()
1521 PetscCall(PetscDSSetJacobian(ds, C_FIELD_ID, P_FIELD_ID, NULL, JC_0_c0p1_3d, NULL, NULL)); in SetupProblem()
1522 PetscCall(PetscDSSetJacobian(ds, P_FIELD_ID, C_FIELD_ID, NULL, NULL, JP_1_p1c0_3d, NULL)); in SetupProblem()
1590 PetscCall(DMSetField(dm, C_FIELD_ID, NULL, (PetscObject)feC)); in SetupDiscretization()
1717 PetscInt fields[NUM_FIELDS] = {C_FIELD_ID, P_FIELD_ID}; in SetInitialConditionsAndTolerances()
1784 funcs[C_FIELD_ID] = initial_conditions_C_0; in SetInitialConditionsAndTolerances()
1787 funcs[C_FIELD_ID] = initial_conditions_C_1; in SetInitialConditionsAndTolerances()
1790 funcs[C_FIELD_ID] = initial_conditions_C_2; in SetInitialConditionsAndTolerances()
1793 funcs[C_FIELD_ID] = initial_conditions_C_random; in SetInitialConditionsAndTolerances()
1797 ctxs[C_FIELD_ID] = r; in SetInitialConditionsAndTolerances()
1869 PetscCall(PetscDSSetObjective(ds, C_FIELD_ID, ellipticity_fail)); in ResizeSetUp()
1871 PetscCall(PetscDSSetObjective(ds, C_FIELD_ID, energy)); in ResizeSetUp()
1872 PetscCall(VecStrideGather(ellVecCellsF, C_FIELD_ID, ellVecCells, INSERT_VALUES)); in ResizeSetUp()
1903 funcs[C_FIELD_ID] = NULL; in ResizeSetUp()
1924 PetscInt fields[NUM_FIELDS] = {C_FIELD_ID, P_FIELD_ID}; in ResizeTransfer()
2033 PetscCall(PetscDSSetObjective(ds, C_FIELD_ID, ellipticity_fail)); in FunctionDomainError()
2035 PetscCall(PetscDSSetObjective(ds, C_FIELD_ID, energy)); in FunctionDomainError()
2036 if (PetscAbsScalar(vals[C_FIELD_ID]) > ctx->function_domain_error_tol) *accept = PETSC_FALSE; in FunctionDomainError()
2037 …bject)ts), "Domain error value %g > %g\n", (double)PetscAbsScalar(vals[C_FIELD_ID]), (double)ctx->… in FunctionDomainError()
2061 PetscCall(PetscDSSetObjective(ds, C_FIELD_ID, ellipticity_fail)); in Monitor()
2063 PetscCall(PetscDSSetObjective(ds, C_FIELD_ID, energy)); in Monitor()
2064 vals[C_FIELD_ID] /= ctx->domain_volume; in Monitor()
2066 …uble)PetscRealPart(vals[C_FIELD_ID]), (double)PetscRealPart(vals[P_FIELD_ID]), (double)PetscRealPa… in Monitor()
2217 if (!ctx->subsct[C_FIELD_ID]) { in MonitorNorms()
2222 PetscCall(MakeScatterAndVec(F, is, &ctx->subvec[C_FIELD_ID], &ctx->subsct[C_FIELD_ID])); in MonitorNorms()
2231 …PetscCall(VecScatterBegin(ctx->subsct[C_FIELD_ID], F, ctx->subvec[C_FIELD_ID], INSERT_VALUES, SCAT… in MonitorNorms()
2232 …PetscCall(VecScatterEnd(ctx->subsct[C_FIELD_ID], F, ctx->subvec[C_FIELD_ID], INSERT_VALUES, SCATTE… in MonitorNorms()
2235 PetscCall(VecNorm(ctx->subvec[C_FIELD_ID], NORM_2, &subnorm[C_FIELD_ID])); in MonitorNorms()
2237 …nt_FMT " SNES Function norms %14.12e, %14.12e\n", its, (double)subnorm[C_FIELD_ID], (double)subnor… in MonitorNorms()