Searched refs:dimR (Results 1 – 3 of 3) sorted by relevance
| /petsc/src/dm/impls/plex/tests/ |
| H A D | ex22.c | 8 PetscInt i, j, dimC, dimR; in testIdentity() local
12 PetscCall(DMGetDimension(dm, &dimR)); in testIdentity()
15 PetscCall(DMGetWorkArray(dm, dimR * numPoints, MPIU_REAL, &preimage)); in testIdentity()
17 PetscCall(DMGetWorkArray(dm, dimR * numPoints, MPIU_REAL, &inverted)); in testIdentity()
19 for (i = 0; i < dimR * numPoints; i++) PetscCall(PetscRandomGetValueReal(randCtx, &preimage[i])); in testIdentity()
20 if (dmIsSimplicial && dimR > 1) { in testIdentity()
22 for (j = 0; j < dimR; j++) { in testIdentity()
23 PetscReal x = preimage[i * dimR + j]; in testIdentity()
24 PetscReal y = preimage[i * dimR + ((j + 1) % dimR)]; in testIdentity()
26 preimage[i * dimR + ((j + 1) % dimR)] = -1. + (y + 1.) * 0.5 * (1. - x); in testIdentity()
[all …]
|
| /petsc/src/dm/field/impls/ds/ |
| H A D | dmfieldds.c | 237 PetscInt dim, dimR, offset; in DMFieldEvaluate_DS() local
258 PetscCall(DMGetDimension(field->dm, &dimR)); in DMFieldEvaluate_DS()
268 …alloc3(gatherSize * dim, &cellPoints, gatherMax * dim, &coordsReal, gatherMax * dimR, &coordsRef)); in DMFieldEvaluate_DS()
269 …PetscCall(PetscMalloc4(gatherMax * dimR, &v, gatherMax * dimR * dimR, &J, gatherMax * dimR * dimR,… in DMFieldEvaluate_DS()
297 PetscCall(PetscMalloc1(dimR * nq, &quadPoints)); in DMFieldEvaluate_DS()
298 for (p = 0; p < dimR * nq; p++) quadPoints[p] = coordsRef[p]; in DMFieldEvaluate_DS()
299 PetscCall(PetscQuadratureSetData(quad, dimR, 0, nq, quadPoints, NULL)); in DMFieldEvaluate_DS()
323 for (d = 0; d < dimR; d++) { in DMFieldEvaluate_DS()
325 …for (e = 0; e < dimR; e++) vs[d] += invJ[dimR * dimR * p + e * dimR + d] * cD[(nc * p + g) * dimR … in DMFieldEvaluate_DS()
327 for (d = 0; d < dimR; d++) cD[(nc * p + g) * dimR + d] = vs[d]; in DMFieldEvaluate_DS()
[all …]
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexgeometry.c | 527 PetscInt degree, dimR, dimC; in DMPlexLocatePoint_Quad_2D_Internal() local
536 PetscCall(DMGetDimension(dm, &dimR)); in DMPlexLocatePoint_Quad_2D_Internal()
555 …PetscCall(DMPlexCoordinatesToReference_FE(cdm, fe, c, 1, pointR, ref, coords, dimC, dimR, 10, &err… in DMPlexLocatePoint_Quad_2D_Internal()
562 PetscCall(DMPlexReferenceToCoordinates_FE(cdm, fe, c, 1, ref, real, coords, dimC, dimR)); in DMPlexLocatePoint_Quad_2D_Internal()
643 PetscInt degree, dimR, dimC; in DMPlexLocatePoint_Hex_3D_Internal() local
652 PetscCall(DMGetDimension(dm, &dimR)); in DMPlexLocatePoint_Hex_3D_Internal()
671 …PetscCall(DMPlexCoordinatesToReference_FE(cdm, fe, c, 1, pointR, ref, coords, dimC, dimR, 10, &err… in DMPlexLocatePoint_Hex_3D_Internal()
678 PetscCall(DMPlexReferenceToCoordinates_FE(cdm, fe, c, 1, ref, real, coords, dimC, dimR)); in DMPlexLocatePoint_Hex_3D_Internal()
1985 const PetscInt dimR = 2; in DMPlexComputeRectangleGeometry_Internal() local
2018 PetscReal xi = points[dimR * i], eta = points[dimR * i + 1]; in DMPlexComputeRectangleGeometry_Internal()
[all …]
|