Home
last modified time | relevance | path

Searched refs:ft (Results 1 – 17 of 17) sorted by relevance

/petsc/src/tao/unconstrained/tutorials/
H A Dminsurf2.c167 PetscReal ft = 0.0; in FormFunction() local
229 ft = ft + (f2 + f4); in FormFunction()
238 ft = ft + PetscSqrtReal(1.0 + d3 * d3 + d2 * d2); in FormFunction()
245 ft = ft + PetscSqrtReal(1.0 + d3 * d3 + d2 * d2); in FormFunction()
252 ft = ft + PetscSqrtReal(1.0 + d1 * d1 + d4 * d4); in FormFunction()
259 ft = ft + PetscSqrtReal(1.0 + d1 * d1 + d4 * d4); in FormFunction()
265 ft += PetscSqrtReal(1.0 + d1 * d1 + d2 * d2); in FormFunction()
270 ft += PetscSqrtReal(1.0 + d1 * d1 + d2 * d2); in FormFunction()
273 ft = ft * area; in FormFunction()
274 PetscCallMPI(MPIU_Allreduce(&ft, fcn, 1, MPIU_REAL, MPIU_SUM, MPI_COMM_WORLD)); in FormFunction()
[all …]
H A Dminsurf1.c130 ….0 / (mx + 1), hy = 1.0 / (my + 1), hydhx = hy / hx, hxdhy = hx / hy, area = 0.5 * hx * hy, ft = 0; in FormFunctionGradient() local
212 ft = ft + (f2 + f4); in FormFunctionGradient()
228 ft = ft + PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2); in FormFunctionGradient()
234 ft = ft + PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2); in FormFunctionGradient()
240 ft = ft + PetscSqrtScalar(1.0 + d1 * d1 + d4 * d4); in FormFunctionGradient()
246 ft = ft + PetscSqrtScalar(1.0 + d1 * d1 + d4 * d4); in FormFunctionGradient()
252 ft += PetscSqrtScalar(1.0 + d1 * d1 + d2 * d2); in FormFunctionGradient()
257 ft += PetscSqrtScalar(1.0 + d1 * d1 + d2 * d2); in FormFunctionGradient()
259 (*fcn) = ft * area; in FormFunctionGradient()
/petsc/src/snes/impls/gs/
H A Dgssecant.c15 PetscReal dxt, xt, ft, ft1 = 0; in SNESComputeNGSDefaultSecant() local
75 ft = 0.; in SNESComputeNGSDefaultSecant()
93 ft += PetscRealPart(PetscSqr(f)); in SNESComputeNGSDefaultSecant()
101 if (k == 0) ft1 = PetscSqrtReal(ft); in SNESComputeNGSDefaultSecant()
105 if (PetscSqrtReal(ft) < atol) isdone = PETSC_TRUE; in SNESComputeNGSDefaultSecant()
106 if (rtol * ft1 > PetscSqrtReal(ft)) isdone = PETSC_TRUE; in SNESComputeNGSDefaultSecant()
/petsc/src/tao/bound/tutorials/
H A Dplate2f.F9070 PetscReal ft, zero, hx, hy, hydhx, hxdhy
82 ft = 0.0
191 ft = ft + f2 + f4
209 ft = ft + sqrt(1.0 + d3*d3 + d2*d2)
217 ft = ft + sqrt(1.0 + d3*d3 + d2*d2)
225 ft = ft + sqrt(1.0 + d1*d1 + d4*d4)
233 ft = ft + sqrt(1.0 + d1*d1 + d4*d4)
240 ft = ft + sqrt(1.0 + d1*d1 + d2*d2)
246 ft = ft + sqrt(1.0 + d1*d1 + d2*d2)
249 ft = ft*area
[all …]
H A Dplate2.c203 PetscReal ft = 0; in FormFunctionGradient() local
303 ft = ft + (f2 + f4); in FormFunctionGradient()
321 ft = ft + PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2); in FormFunctionGradient()
328 ft = ft + PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2); in FormFunctionGradient()
336 ft = ft + PetscSqrtScalar(1.0 + d1 * d1 + d4 * d4); in FormFunctionGradient()
343 ft = ft + PetscSqrtScalar(1.0 + d1 * d1 + d4 * d4); in FormFunctionGradient()
350 ft += PetscSqrtScalar(1.0 + d1 * d1 + d2 * d2); in FormFunctionGradient()
355 ft += PetscSqrtScalar(1.0 + d1 * d1 + d2 * d2); in FormFunctionGradient()
358 ft = ft * area; in FormFunctionGradient()
359 PetscCallMPI(MPIU_Allreduce(&ft, fcn, 1, MPIU_REAL, MPIU_SUM, MPI_COMM_WORLD)); in FormFunctionGradient()
/petsc/src/dm/impls/plex/
H A Dplexvtu.c274 … if ((link->ft != PETSC_VTK_CELL_FIELD) && (link->ft != PETSC_VTK_CELL_VECTOR_FIELD)) continue; in DMPlexVTKWriteAll_VTU()
306 if (link->ft == PETSC_VTK_CELL_VECTOR_FIELD) { in DMPlexVTKWriteAll_VTU()
368 … if ((link->ft != PETSC_VTK_POINT_FIELD) && (link->ft != PETSC_VTK_POINT_VECTOR_FIELD)) continue; in DMPlexVTKWriteAll_VTU()
395 if (link->ft == PETSC_VTK_POINT_VECTOR_FIELD) { in DMPlexVTKWriteAll_VTU()
543 … if ((link->ft != PETSC_VTK_CELL_FIELD) && (link->ft != PETSC_VTK_CELL_VECTOR_FIELD)) continue; in DMPlexVTKWriteAll_VTU()
567 if (link->ft == PETSC_VTK_CELL_VECTOR_FIELD) { in DMPlexVTKWriteAll_VTU()
641 … if ((link->ft != PETSC_VTK_POINT_FIELD) && (link->ft != PETSC_VTK_POINT_VECTOR_FIELD)) continue; in DMPlexVTKWriteAll_VTU()
660 if (link->ft == PETSC_VTK_POINT_VECTOR_FIELD) { in DMPlexVTKWriteAll_VTU()
770 … if ((link->ft != PETSC_VTK_CELL_FIELD) && (link->ft != PETSC_VTK_CELL_VECTOR_FIELD)) continue; in DMPlexVTKWriteAll_VTU()
792 if (link->ft == PETSC_VTK_CELL_VECTOR_FIELD) { in DMPlexVTKWriteAll_VTU()
[all …]
H A Dplexorient.c36 DMPolytopeType ft; in DMPlexOrientPoint() local
39 PetscCall(DMPlexGetCellType(dm, cone[c], &ft)); in DMPlexOrientPoint()
40 nO = DMPolytopeTypeGetNumArrangements(ft) / 2; in DMPlexOrientPoint()
42 newornt[c] = DMPolytopeTypeComposeOrientation(ft, arr[c * 2 + 1], ornt[arr[c * 2 + 0]]); in DMPlexOrientPoint()
43 …MT ",%" PetscInt_FMT ") for %s %" PetscInt_FMT, newornt[c], -nO, nO, DMPolytopeTypes[ft], cone[c]); in DMPlexOrientPoint()
H A Dplex.c129 PetscViewerVTKFieldType *ft; in DMPlexGetFieldTypes_Internal() local
173 PetscCall(PetscMalloc3(*types, &sStart, *types, &sEnd, *types, &ft)); in DMPlexGetFieldTypes_Internal()
178 ft[t] = (globalvcdof[t] == cdim) ? PETSC_VTK_POINT_VECTOR_FIELD : PETSC_VTK_POINT_FIELD; in DMPlexGetFieldTypes_Internal()
189 ft[t] = (globalvcdof[c] == cdim) ? PETSC_VTK_CELL_VECTOR_FIELD : PETSC_VTK_CELL_FIELD; in DMPlexGetFieldTypes_Internal()
207 *sft = ft; in DMPlexGetFieldTypes_Internal()
211 … PetscInt field, PetscInt *types, PetscInt **sStart, PetscInt **sEnd, PetscViewerVTKFieldType **ft) in DMPlexRestoreFieldTypes_Internal() argument
214 PetscCall(PetscFree3(*sStart, *sEnd, *ft)); in DMPlexRestoreFieldTypes_Internal()
218 …etscSection section, PetscInt field, PetscInt *sStart, PetscInt *sEnd, PetscViewerVTKFieldType *ft) in DMPlexGetFieldType_Internal() argument
224 *ft = PETSC_VTK_INVALID; in DMPlexGetFieldType_Internal()
240 if (globalvcdof[0] == cdim) *ft = PETSC_VTK_POINT_VECTOR_FIELD; in DMPlexGetFieldType_Internal()
[all …]
H A Dplexsubmesh.c1590 DMPolytopeType ft = dep == 2 ? DM_POLYTOPE_SEGMENT : DM_POLYTOPE_POINT; in DMPlexConstructCohesiveCells_Internal() local
1599 coneONew[2 + q] = DMPolytopeTypeComposeOrientation(ft, qo, ornt[qa]); in DMPlexConstructCohesiveCells_Internal()
/petsc/src/snes/tutorials/
H A Dex4.c120 PetscReal ft = 0, area; in FormObjectiveLocal() local
161 ft += PetscRealPart(f2 + f4); in FormObjectiveLocal()
170 ft += PetscSqrtReal(1.0 + d3 * d3 + d2 * d2); in FormObjectiveLocal()
177 ft += PetscSqrtReal(1.0 + d3 * d3 + d2 * d2); in FormObjectiveLocal()
184 ft += PetscSqrtReal(1.0 + d1 * d1 + d4 * d4); in FormObjectiveLocal()
191 ft += PetscSqrtReal(1.0 + d1 * d1 + d4 * d4); in FormObjectiveLocal()
197 ft += PetscSqrtReal(1.0 + d1 * d1 + d2 * d2); in FormObjectiveLocal()
202 ft += PetscSqrtReal(1.0 + d1 * d1 + d2 * d2); in FormObjectiveLocal()
204 ft *= area; in FormObjectiveLocal()
205 *v = ft; in FormObjectiveLocal()
/petsc/src/sys/classes/viewer/impls/vtk/
H A Dvtkvimpl.h7 PetscViewerVTKFieldType ft; member
H A Dvtkv.c181 link->ft = fieldtype; in PetscViewerVTKAddField_VTK()
/petsc/src/ts/tutorials/
H A Dex11.h683 …static PetscScalar bn[3], fn, ft, tg[3], pl, rl, pm, pr, rr, xp, ubl, ubm, ubr, dtt, unm, tmp, utl… in godunovflux() local
771 ft = rhom * unm * utm; in godunovflux()
774 flux[1] = fn * nn[0] + ft * tg[0]; in godunovflux()
775 flux[2] = fn * nn[1] + ft * tg[1]; in godunovflux()
/petsc/src/dm/impls/plex/transform/interface/
H A Dplextransform.c1465 …const DMPolytopeType ft = (DMPolytopeType)rcone[coff++]; /* Cell type for new cone point of pNe… in DMPlexTransformGetCone_Internal() local
1491 PetscCall(DMPlexTransformGetSubcellOrientation(tr, pct, pp, fn ? po : o, ft, pr, fo, &pr, &fo)); in DMPlexTransformGetCone_Internal()
1492 PetscCall(DMPlexTransformGetTargetPoint(tr, pct, ft, pp, pr, &coneNew[c])); in DMPlexTransformGetCone_Internal()
1494 if (newft) newft[c] = ft; in DMPlexTransformGetCone_Internal()
1505 DMPolytopeType ft = newft[c]; in DMPlexTransformGetCone_Internal() local
1508 nO = DMPolytopeTypeGetNumArrangements(ft) / 2; in DMPlexTransformGetCone_Internal()
1510 newornt[c] = DMPolytopeTypeComposeOrientation(ft, arr[c * 2 + 1], orntNew[arr[c * 2 + 0]]); in DMPlexTransformGetCone_Internal()
1511 …",%" PetscInt_FMT ") for %s %" PetscInt_FMT, newornt[c], -nO, nO, DMPolytopeTypes[ft], coneNew[c]); in DMPlexTransformGetCone_Internal()
/petsc/src/dm/impls/plex/hdf5/
H A Dplexhdf5.c557 PetscViewerVTKFieldType *ft; in VecView_Plex_Local_HDF5_Internal() local
559 …rsion, 1, 1, 0)) PetscCall(DMPlexGetFieldTypes_Internal(dm, section, f, &Nt, &pStart, &pEnd, &ft)); in VecView_Plex_Local_HDF5_Internal()
561 PetscCall(PetscMalloc3(Nt, &pStart, Nt, &pEnd, Nt, &ft)); in VecView_Plex_Local_HDF5_Internal()
562 PetscCall(DMPlexGetFieldType_Internal(dm, section, f, &pStart[0], &pEnd[0], &ft[0])); in VecView_Plex_Local_HDF5_Internal()
567 if (ft[t] == PETSC_VTK_INVALID) continue; in VecView_Plex_Local_HDF5_Internal()
568 …fgroup = (ft[t] == PETSC_VTK_POINT_VECTOR_FIELD) || (ft[t] == PETSC_VTK_POINT_FIELD) ? "/vertex_fi… in VecView_Plex_Local_HDF5_Internal()
640 if (ft[t] == PETSC_VTK_POINT_VECTOR_FIELD || ft[t] == PETSC_VTK_CELL_VECTOR_FIELD) { in VecView_Plex_Local_HDF5_Internal()
659 if (!DMPlexStorageVersionEQ(version, 1, 1, 0)) PetscCall(PetscFree3(pStart, pEnd, ft)); in VecView_Plex_Local_HDF5_Internal()
/petsc/src/ts/impls/implicit/sundials/
H A Dsundials.c834 PetscErrorCode TSSundialsMonitorInternalSteps(TS ts, PetscBool ft) in TSSundialsMonitorInternalSteps() argument
837 PetscTryMethod(ts, "TSSundialsMonitorInternalSteps_C", (TS, PetscBool), (ts, ft)); in TSSundialsMonitorInternalSteps()
/petsc/share/petsc/datafiles/meshes/
H A Dtestcase3D.cas2425 (dpm/ft-limiter 0.01)
3371 (pdf/activate-ft-simplec? #f)
8839 …ot (cdr (assq 'sg-noniterative? (%rp-config #f)))) (rpgetvar 'pdf/activate-ft-simplec?))) (lambda …