| /petsc/src/vec/is/utils/ftn-custom/ |
| H A D | zvsectionisf.c | 18 PETSC_EXTERN void petscsectiongetpointsyms_(PetscSection section, PetscInt *numPoints, PetscInt *po… in petscsectiongetpointsyms_() argument 20 …*__ierr = PetscSectionGetPointSyms(section, *numPoints, points, (const PetscInt ***)perms, (const … in petscsectiongetpointsyms_() 22 PETSC_EXTERN void petscsectionrestorepointsyms_(PetscSection section, PetscInt *numPoints, PetscInt… in petscsectionrestorepointsyms_() argument 24 …*__ierr = PetscSectionRestorePointSyms(section, *numPoints, points, (const PetscInt ***)perms, (co… in petscsectionrestorepointsyms_() 26 …tiongetfieldpointsyms_(PetscSection section, PetscInt *field, PetscInt *numPoints, PetscInt *point… in petscsectiongetfieldpointsyms_() argument 28 …*__ierr = PetscSectionGetFieldPointSyms(section, *field, *numPoints, points, (const PetscInt ***)p… in petscsectiongetfieldpointsyms_() 30 …restorefieldpointsyms_(PetscSection section, PetscInt *field, PetscInt *numPoints, PetscInt *point… in petscsectionrestorefieldpointsyms_() argument 32 …*__ierr = PetscSectionRestoreFieldPointSyms(section, *field, *numPoints, points, (const PetscInt *… in petscsectionrestorefieldpointsyms_()
|
| /petsc/src/dm/impls/plex/tests/ |
| H A D | ex7.c | 174 PetscInt numPoints[2] = {4, 2}; in CreateSimplex_2D() local 181 …PetscCall(DMPlexCreateFromDAG(dm, depth, numPoints, coneSize, cones, coneOrientations, vertexCoord… in CreateSimplex_2D() 188 PetscInt numPoints[2] = {0, 0}; in CreateSimplex_2D() local 190 PetscCall(DMPlexCreateFromDAG(dm, depth, numPoints, NULL, NULL, NULL, NULL)); in CreateSimplex_2D() 206 PetscInt numPoints[2] = {5, 2}; in CreateSimplex_3D() local 213 …PetscCall(DMPlexCreateFromDAG(dm, depth, numPoints, coneSize, cones, coneOrientations, vertexCoord… in CreateSimplex_3D() 220 PetscInt numPoints[2] = {0, 0}; in CreateSimplex_3D() local 222 PetscCall(DMPlexCreateFromDAG(dm, depth, numPoints, NULL, NULL, NULL, NULL)); in CreateSimplex_3D() 238 PetscInt numPoints[2] = {6, 2}; in CreateQuad_2D() local 245 …PetscCall(DMPlexCreateFromDAG(dm, depth, numPoints, coneSize, cones, coneOrientations, vertexCoord… in CreateQuad_2D() [all …]
|
| H A D | ex4.c | 58 PetscInt numPoints[2] = {3, 2}; in CreateSimplex_1D() local 64 …PetscCall(DMPlexCreateFromDAG(*dm, depth, numPoints, coneSize, cones, coneOrientations, vertexCoor… in CreateSimplex_1D() 66 PetscInt numPoints[2] = {0, 0}; in CreateSimplex_1D() local 68 PetscCall(DMPlexCreateFromDAG(*dm, depth, numPoints, NULL, NULL, NULL, NULL)); in CreateSimplex_1D() 111 PetscInt numPoints[3] = {4, 5, 2}; in CreateSimplex_2D() local 117 …PetscCall(DMPlexCreateFromDAG(*dm, depth, numPoints, coneSize, cones, coneOrientations, vertexCoor… in CreateSimplex_2D() 119 PetscInt numPoints[3] = {0, 0, 0}; in CreateSimplex_2D() local 121 PetscCall(DMPlexCreateFromDAG(*dm, depth, numPoints, NULL, NULL, NULL, NULL)); in CreateSimplex_2D() 149 PetscInt numPoints[2] = {4, 2}; in CreateSimplexHybrid_2D() local 156 …PetscCall(DMPlexCreateFromDAG(*dm, 1, numPoints, coneSize, cones, coneOrientations, vertexCoords)); in CreateSimplexHybrid_2D() [all …]
|
| H A D | ex98.c | 11 PetscInt sdim, s, pStart, pEnd, p, numVS, numPoints; in main() local 57 PetscCall(DMGetStratumSize(dm, "Vertex Sets", setID[s], &numPoints)); in main() 58 …ll(PetscPrintf(PETSC_COMM_WORLD, "set %" PetscInt_FMT " size: %" PetscInt_FMT "\n", s, numPoints)); in main() 60 for (p = 0; p < numPoints; ++p) { in main() 75 PetscCall(DMGetStratumSize(dm, "Vertex Sets", setID[s], &numPoints)); in main() 77 for (p = 0; p < numPoints; ++p) { in main()
|
| H A D | ex22.c | 6 …m, PetscBool dmIsSimplicial, PetscInt cell, PetscRandom randCtx, PetscInt numPoints, PetscReal tol) in testIdentity() argument 15 PetscCall(DMGetWorkArray(dm, dimR * numPoints, MPIU_REAL, &preimage)); in testIdentity() 16 PetscCall(DMGetWorkArray(dm, dimC * numPoints, MPIU_REAL, &mapped)); 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() 21 for (i = 0; i < numPoints; i++) { in testIdentity() 31 PetscCall(DMPlexReferenceToCoordinates(dm, cell, numPoints, preimage, mapped)); in testIdentity() 32 PetscCall(DMPlexCoordinatesToReference(dm, cell, numPoints, mapped, inverted)); in testIdentity() 34 for (i = 0; i < numPoints; i++) { in testIdentity() 94 PetscCall(DMRestoreWorkArray(dm, dimR * numPoints, MPIU_REAL, &inverted)); in testIdentity() [all …]
|
| H A D | ex98f90.F90 | 15 PetscInt :: sdim, s, pStart, pEnd, p, numVS, numPoints 66 PetscCallA(DMGetStratumSize(dm, 'Vertex Sets', setID(s), numPoints, ierr)) 67 write (iobuffer, '("set ",i3," size ",i3,"\n")') s, numPoints 70 do p = 1, numPoints 87 PetscCallA(DMGetStratumSize(dm, 'Vertex Sets', setID(s), numPoints, ierr)) 89 do p = 1, numPoints
|
| H A D | ex5.c | 436 PetscInt numPoints[2] = {4, 2}; in CreateSimplex_2D() local 444 …PetscCall(DMPlexCreateFromDAG(*dm, 1, numPoints, coneSize, cones, coneOrientations, vertexCoords)); in CreateSimplex_2D() 451 PetscInt numPoints[2] = {6, 4}; in CreateSimplex_2D() local 459 …PetscCall(DMPlexCreateFromDAG(*dm, 1, numPoints, coneSize, cones, coneOrientations, vertexCoords)); in CreateSimplex_2D() 470 PetscInt numPoints[2] = {8, 6}; in CreateSimplex_2D() local 480 …PetscCall(DMPlexCreateFromDAG(*dm, 1, numPoints, coneSize, cones, coneOrientations, vertexCoords)); in CreateSimplex_2D() 494 PetscInt numPoints[2] = {7, 6}; in CreateSimplex_2D() local 502 …PetscCall(DMPlexCreateFromDAG(*dm, 1, numPoints, coneSize, cones, coneOrientations, vertexCoords)); in CreateSimplex_2D() 516 PetscInt numPoints[3] = {0, 0, 0}; in CreateSimplex_2D() local 518 PetscCall(DMPlexCreateFromDAG(*dm, 1, numPoints, NULL, NULL, NULL, NULL)); in CreateSimplex_2D() [all …]
|
| H A D | ex1f90.F90 | 12 PetscInt v, numVertices, numPoints 25 numPoints = numCells + numVertices 26 PetscCallA(DMPlexSetChart(dm, i0, numPoints, ierr))
|
| H A D | ex34.c | 38 PetscInt numPoints[2] = {8, 3}; in CreateHybridMesh() local 44 …PetscCall(DMPlexCreateFromDAG(*dm, 1, numPoints, coneSize, cones, coneOrientations, vertexCoords)); in CreateHybridMesh() 87 PetscInt numPoints[2] = {16, 5}; in CreateReverseHybridMesh() local 94 …PetscCall(DMPlexCreateFromDAG(*dm, 1, numPoints, coneSize, cones, coneOrientations, vertexCoords)); in CreateReverseHybridMesh()
|
| H A D | ex9.c | 87 PetscInt numPoints[2] = {4, 2}; in CreateSimplex_2D() local 100 …PetscCall(DMPlexCreateFromDAG(dm, depth, numPoints, coneSize, cones, coneOrientations, vertexCoord… in CreateSimplex_2D() 109 PetscInt numPoints[2] = {5, 2}; in CreateSimplex_3D() local 122 …PetscCall(DMPlexCreateFromDAG(dm, depth, numPoints, coneSize, cones, coneOrientations, vertexCoord… in CreateSimplex_3D() 131 PetscInt numPoints[2] = {6, 2}; in CreateQuad_2D() local 144 …PetscCall(DMPlexCreateFromDAG(dm, depth, numPoints, coneSize, cones, coneOrientations, vertexCoord… in CreateQuad_2D() 153 PetscInt numPoints[2] = {12, 2}; in CreateHex_3D() local 166 …PetscCall(DMPlexCreateFromDAG(dm, depth, numPoints, coneSize, cones, coneOrientations, vertexCoord… in CreateHex_3D()
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexindices.c | 35 PetscInt *points = NULL, numPoints, p, dof, cldof = 0; in DMPlexCreateClosureIndex() local 37 PetscCall(DMPlexGetTransitiveClosure(dm, point, PETSC_TRUE, &numPoints, &points)); in DMPlexCreateClosureIndex() 38 for (p = 0; p < numPoints * 2; p += 2) { in DMPlexCreateClosureIndex() 44 PetscCall(DMPlexRestoreTransitiveClosure(dm, point, PETSC_TRUE, &numPoints, &points)); in DMPlexCreateClosureIndex() 51 PetscInt *points = NULL, numPoints, p, q, dof, cldof, cloff; in DMPlexCreateClosureIndex() local 55 PetscCall(DMPlexGetTransitiveClosure(dm, point, PETSC_TRUE, &numPoints, &points)); in DMPlexCreateClosureIndex() 56 for (p = 0, q = 0; p < numPoints * 2; p += 2) { in DMPlexCreateClosureIndex() 66 PetscCall(DMPlexRestoreTransitiveClosure(dm, point, PETSC_TRUE, &numPoints, &points)); in DMPlexCreateClosureIndex()
|
| H A D | plexproject.c | 94 PetscInt q, dim, numPoints; in DMProjectPoint_Func_Private() local 102 PetscCall(PetscQuadratureGetData(allPoints, &dim, NULL, &numPoints, &points, NULL)); in DMProjectPoint_Func_Private() 103 PetscCall(DMGetWorkArray(rdm, numPoints * Nc[f], MPIU_SCALAR, &pointEval)); in DMProjectPoint_Func_Private() 105 PetscCall(PetscArrayzero(pointEval, numPoints * Nc[f])); in DMProjectPoint_Func_Private() 106 for (q = 0; q < numPoints; q++, tp++) { in DMProjectPoint_Func_Private() 146 PetscCall(PetscDualSpacePullback(sp[f], fegeom, numPoints, Nc[f], pointEval)); in DMProjectPoint_Func_Private() 149 PetscCall(DMRestoreWorkArray(rdm, numPoints * Nc[f], MPIU_SCALAR, &pointEval)); in DMProjectPoint_Func_Private() 290 PetscInt q, dim, numPoints; in DMProjectPoint_Field_Private() local 310 PetscCall(PetscQuadratureGetData(allPoints, &dim, NULL, &numPoints, &points, NULL)); in DMProjectPoint_Field_Private() 311 PetscCall(DMGetWorkArray(dm, numPoints * Nc[f], MPIU_SCALAR, &pointEval)); in DMProjectPoint_Field_Private() [all …]
|
| H A D | plexpartition.c | 1051 PetscErrorCode DMPlexClosurePoints_Private(DM dm, PetscInt numPoints, const PetscInt points[], IS *… in DMPlexClosurePoints_Private() argument 1060 PetscCall(PetscHSetIResize(ht, numPoints * 16)); in DMPlexClosurePoints_Private() 1062 for (p = 0; p < numPoints; ++p) PetscCall(DMPlexAddClosure_Private(dm, ht, points[p])); in DMPlexClosurePoints_Private() 1065 for (p = 0; p < numPoints; ++p) PetscCall(DMPlexAddClosureTree_Private(dm, ht, points[p])); in DMPlexClosurePoints_Private() 1068 for (p = 0; p < numPoints; ++p) { in DMPlexClosurePoints_Private() 1102 PetscInt numRanks, numPoints, r; in DMPlexPartitionLabelClosure() local 1111 PetscCall(ISGetLocalSize(pointIS, &numPoints)); in DMPlexPartitionLabelClosure() 1113 PetscCall(DMPlexClosurePoints_Private(dm, numPoints, points, &closureIS)); in DMPlexPartitionLabelClosure() 1139 PetscInt numRanks, numPoints, r, p, a, adjSize; in DMPlexPartitionLabelAdjacency() local 1150 PetscCall(ISGetLocalSize(pointIS, &numPoints)); in DMPlexPartitionLabelAdjacency() [all …]
|
| H A D | plex.c | 4013 …_Private(DM dm, PetscInt p, PetscInt ornt, PetscBool useCone, PetscInt *numPoints, PetscInt *point… in DMPlexGetTransitiveClosure_Depth1_Private() argument 4055 if (numPoints) *numPoints = tmpSize + 1; in DMPlexGetTransitiveClosure_Depth1_Private() 4061 …cInt point, DMPolytopeType ct, PetscInt o, PetscBool useCone, PetscInt *numPoints, PetscInt **poin… in DMPlexTransitiveClosure_Tensor_Internal() argument 4125 *numPoints = c / 2; in DMPlexTransitiveClosure_Tensor_Internal() 4130 …Internal(DM dm, PetscInt p, PetscInt ornt, PetscBool useCone, PetscInt *numPoints, PetscInt *point… in DMPlexGetTransitiveClosure_Internal() argument 4141 PetscCall(DMPlexGetTransitiveClosure_Depth1_Private(dm, p, ornt, useCone, numPoints, points)); in DMPlexGetTransitiveClosure_Internal() 4147 PetscCall(DMPlexTransitiveClosure_Tensor_Internal(dm, p, ct, ornt, useCone, numPoints, points)); in DMPlexGetTransitiveClosure_Internal() 4200 if (numPoints) *numPoints = closureSize / 2; in DMPlexGetTransitiveClosure_Internal() 4239 PetscErrorCode DMPlexGetTransitiveClosure(DM dm, PetscInt p, PetscBool useCone, PetscInt *numPoints… in DMPlexGetTransitiveClosure() argument 4243 if (numPoints) PetscAssertPointer(numPoints, 4); in DMPlexGetTransitiveClosure() [all …]
|
| /petsc/src/dm/field/impls/shell/ |
| H A D | dmfieldshell.c | 37 PetscInt dimC, dim, numPoints, Nq, p, Nc; in DMFieldShellEvaluateFEDefault() local 46 PetscCall(ISGetLocalSize(pointIS, &numPoints)); in DMFieldShellEvaluateFEDefault() 47 PetscCall(PetscMalloc1(dimC * Nq * numPoints, &pfArray)); in DMFieldShellEvaluateFEDefault() 48 for (p = 0; p < numPoints * dimC * Nq; p++) pfArray[p] = geom->v[p]; in DMFieldShellEvaluateFEDefault() 49 …teMPIWithArray(PetscObjectComm((PetscObject)pointIS), dimC, dimC * Nq * numPoints, PETSC_DETERMINE… in DMFieldShellEvaluateFEDefault() 57 for (p = 0; p < numPoints * Nq; p++) { in DMFieldShellEvaluateFEDefault() 74 for (p = 0; p < numPoints * Nq; p++) { in DMFieldShellEvaluateFEDefault() 94 for (p = 0; p < numPoints * Nq; p++) { in DMFieldShellEvaluateFEDefault() 117 for (p = 0; p < numPoints * Nq; p++) { in DMFieldShellEvaluateFEDefault() 150 PetscInt dimC, dim, numPoints, Nq, p; in DMFieldShellEvaluateFVDefault() local [all …]
|
| /petsc/src/dm/impls/plex/ftn-custom/ |
| H A D | zplexf90.c | 183 PETSC_EXTERN void dmplexgetjoin_(DM *dm, PetscInt *numPoints, PetscInt *points, PetscInt *N, F90Arr… in dmplexgetjoin_() argument 189 *ierr = DMPlexGetJoin(*dm, *numPoints, points, &n, &coveredPoints); in dmplexgetjoin_() 195 PETSC_EXTERN void dmplexgetfulljoin_(DM *dm, PetscInt *numPoints, PetscInt *points, PetscInt *N, F9… in dmplexgetfulljoin_() argument 201 *ierr = DMPlexGetFullJoin(*dm, *numPoints, points, &n, &coveredPoints); in dmplexgetfulljoin_() 207 PETSC_EXTERN void dmplexrestorejoin_(DM *dm, PetscInt *numPoints, PetscInt *points, PetscInt *N, F9… in dmplexrestorejoin_() argument 219 PETSC_EXTERN void dmplexgetmeet_(DM *dm, PetscInt *numPoints, PetscInt *points, PetscInt *N, F90Arr… in dmplexgetmeet_() argument 225 *ierr = DMPlexGetMeet(*dm, *numPoints, points, &n, &coveredPoints); in dmplexgetmeet_() 231 PETSC_EXTERN void dmplexgetfullmeet_(DM *dm, PetscInt *numPoints, PetscInt *points, PetscInt *N, F9… in dmplexgetfullmeet_() argument 238 *ierr = DMPlexGetFullMeet(*dm, *numPoints, points, &n, &coveredPoints); in dmplexgetfullmeet_() 244 PETSC_EXTERN void dmplexrestoremeet_(DM *dm, PetscInt *numPoints, PetscInt *points, PetscInt *N, F9… in dmplexrestoremeet_() argument
|
| /petsc/src/vec/vec/tutorials/ |
| H A D | ex18.c | 23 PetscInt rstart, rend, i, k, N, numPoints = 1000000; in main() local 24 PetscScalar dummy, result = 0, h = 1.0 / numPoints, *xarray; in main() 39 PetscCall(VecSetSizes(x, PETSC_DECIDE, numPoints)); in main()
|
| H A D | ex18f.F90 | 14 PetscInt, parameter :: numPoints = 1000000 16 PetscScalar, parameter :: h = 1.0/numPoints 34 PetscCallA(VecSetSizes(x, PETSC_DECIDE, numPoints, ierr))
|
| /petsc/src/dm/impls/plex/tutorials/ |
| H A D | ex3f90.F90 | 14 PetscInt, dimension(2) :: numPoints 35 numPoints = [12, 2] 55 …PetscCallA(DMPlexCreateFromDAG(dm, depth, numPoints, coneSize, cones, coneOrientations, vertexCoor…
|
| /petsc/src/dm/dt/space/impls/point/ |
| H A D | spacepoint.c | 16 …space in dimension %" PetscInt_FMT " on %" PetscInt_FMT " points\n", sp->Nv, pt->quad->numPoints)); in PetscSpacePointView_Ascii() 59 *dim = pt->quad->numPoints; in PetscSpaceGetDimension_Point() 66 PetscInt dim = sp->Nv, pdim = pt->quad->numPoints, d, p, i, c; in PetscSpaceEvaluate_Point() 69 …numPoints, PETSC_COMM_SELF, PETSC_ERR_SUP, "Cannot evaluate Point space on %" PetscInt_FMT " point… in PetscSpaceEvaluate_Point()
|
| /petsc/src/dm/dt/fe/interface/ |
| H A D | fegeom.c | 31 g->numPoints = Nq; in PetscFEGeomCreate() 94 Nq = geom->numPoints; in PetscFEGeomGetChunk() 99 (*chunkGeom)->numPoints = geom->numPoints; in PetscFEGeomGetChunk() 164 const PetscInt Np = geom->numPoints; in PetscFEGeomGetPoint() 217 const PetscInt Np = geom->numPoints; in PetscFEGeomGetCellPoint() 265 N = geom->numPoints * geom->numCells; in PetscFEGeomComplete()
|
| /petsc/include/petsc/private/ |
| H A D | dtimpl.h | 11 PetscInt numPoints; /* The number of quadrature points on an element */ member
|
| /petsc/src/dm/impls/plex/generators/ctetgen/ |
| H A D | ctetgenerate.c | 98 PetscInt *points = NULL, numPoints, p, numVertices = 0, v, m = -1; in DMPlexGenerate_CTetgen() local 106 PetscCall(DMPlexGetTransitiveClosure(boundary, f, PETSC_TRUE, &numPoints, &points)); in DMPlexGenerate_CTetgen() 107 for (p = 0; p < numPoints * 2; p += 2) { in DMPlexGenerate_CTetgen() 121 PetscCall(DMPlexRestoreTransitiveClosure(boundary, f, PETSC_TRUE, &numPoints, &points)); in DMPlexGenerate_CTetgen() 365 PetscInt supportSize, numPoints, p, Nv = 0, val; in DMPlexRefine_CTetgen() local 369 PetscCall(DMPlexGetTransitiveClosure(dm, f, PETSC_TRUE, &numPoints, &points)); in DMPlexRefine_CTetgen() 370 for (p = 0; p < numPoints * 2; p += 2) { in DMPlexRefine_CTetgen() 374 PetscCall(DMPlexRestoreTransitiveClosure(dm, f, PETSC_TRUE, &numPoints, &points)); in DMPlexRefine_CTetgen()
|
| /petsc/src/dm/partitioner/impls/shell/ |
| H A D | partshell.c | 185 PetscInt proc, numPoints; in PetscPartitionerShellSetPartition() local 199 PetscCall(PetscSectionGetStorageSize(p->section, &numPoints)); in PetscPartitionerShellSetPartition() 200 …PetscCall(ISCreateGeneral(PetscObjectComm((PetscObject)part), numPoints, points, PETSC_COPY_VALUES… in PetscPartitionerShellSetPartition()
|
| /petsc/src/dm/impls/plex/generators/tetgen/ |
| H A D | tetgenerate.cxx | 119 PetscInt *points = nullptr, numPoints, p, numVertices = 0, v, val = -1; in DMPlexGenerate_Tetgen() local 126 PetscCall(DMPlexGetTransitiveClosure(boundary, f, PETSC_TRUE, &numPoints, &points)); in DMPlexGenerate_Tetgen() 127 for (p = 0; p < numPoints * 2; p += 2) { in DMPlexGenerate_Tetgen() 141 PetscCall(DMPlexRestoreTransitiveClosure(boundary, f, PETSC_TRUE, &numPoints, &points)); in DMPlexGenerate_Tetgen() 383 PetscInt *points = nullptr, numPoints, p, numVertices = 0, v, val; in DMPlexRefine_Tetgen() local 390 PetscCall(DMPlexGetTransitiveClosure(dm, f, PETSC_TRUE, &numPoints, &points)); in DMPlexRefine_Tetgen() 391 for (p = 0; p < numPoints * 2; p += 2) { in DMPlexRefine_Tetgen() 407 PetscCall(DMPlexRestoreTransitiveClosure(dm, f, PETSC_TRUE, &numPoints, &points)); in DMPlexRefine_Tetgen()
|