| /petsc/src/dm/impls/plex/ftn-custom/ ! |
| H A D | zplexf90.c | 150 …cSection *idxSection, PetscInt *point, PetscBool *useClPerm, PetscInt *numIndices, F90Array1d *idx… in dmplexgetclosureindices_() argument
156 …MPlexGetClosureIndices(*dm, *section, *idxSection, *point, *useClPerm, numIndices, &indices, outOf… in dmplexgetclosureindices_()
157 …else *ierr = DMPlexGetClosureIndices(*dm, *section, *idxSection, *point, *useClPerm, numIndices, &… in dmplexgetclosureindices_()
159 …*ierr = F90Array1dCreate((void *)indices, MPIU_INT, 1, *numIndices, idxPtr PETSC_F90_2PTR_PARAM(id… in dmplexgetclosureindices_()
161 …TER(valPtr)) *ierr = F90Array1dCreate((void *)values, MPIU_SCALAR, 1, *numIndices, valPtr PETSC_F9… in dmplexgetclosureindices_()
164 …cSection *idxSection, PetscInt *point, PetscBool *useClPerm, PetscInt *numIndices, F90Array1d *idx… in dmplexrestoreclosureindices_() argument
175 …*ierr = DMPlexRestoreClosureIndices(*dm, *section, *idxSection, *point, *useClPerm, numIndices, &i… in dmplexrestoreclosureindices_()
176 …xRestoreClosureIndices(*dm, *section, *idxSection, *point, *useClPerm, numIndices, &indices, outOf… in dmplexrestoreclosureindices_()
|
| /petsc/src/vec/is/sf/utils/ ! |
| H A D | sfutils.c | 451 PetscInt numRoots, numSectionRoots, numPoints, numIndices = 0; in PetscSFCreateSectionSF() local
475 numIndices += dof < 0 ? 0 : dof; in PetscSFCreateSectionSF()
478 PetscCall(PetscMalloc1(numIndices, &localIndices)); in PetscSFCreateSectionSF()
479 PetscCall(PetscMalloc1(numIndices, &remoteIndices)); in PetscSFCreateSectionSF()
498 …PetscCheck(numIndices == ind, comm, PETSC_ERR_PLIB, "Inconsistency in indices, %" PetscInt_FMT " s… in PetscSFCreateSectionSF()
499 …PetscCall(PetscSFSetGraph(*sectionSF, numSectionRoots, numIndices, localIndices, PETSC_OWN_POINTER… in PetscSFCreateSectionSF()
|
| /petsc/src/dm/impls/plex/ ! |
| H A D | plextree.c | 2264 PetscInt numIndices, *indices; in DMPlexComputeInterpolatorTree() local
2265 …exGetClosureIndices(coarse, localCoarse, globalCoarse, p, PETSC_TRUE, &numIndices, &indices, offse… in DMPlexComputeInterpolatorTree()
2266 …PetscCheck(numIndices == numColIndices, PETSC_COMM_SELF, PETSC_ERR_PLIB, "mismatching constraint i… in DMPlexComputeInterpolatorTree()
2272 …storeClosureIndices(coarse, localCoarse, globalCoarse, p, PETSC_TRUE, &numIndices, &indices, offse… in DMPlexComputeInterpolatorTree()
3298 PetscInt l, nleaves, dof, cdof, numPointsWithDofs, offset, *pointsWithDofs, numIndices; in DMPlexTransferInjectorTree() local
3315 PetscCall(PetscSectionGetStorageSize(leafIndicesSec, &numIndices)); in DMPlexTransferInjectorTree()
3316 PetscCall(PetscMalloc1((gatheredIndices ? numIndices : (maxDof + 1)), &leafInds)); in DMPlexTransferInjectorTree()
3317 if (gatheredValues) PetscCall(PetscMalloc1(numIndices, &leafVals)); in DMPlexTransferInjectorTree()
3588 PetscInt numIndices, childId, offset; in DMPlexComputeInjectorTree() local
3591 PetscCall(PetscSectionGetDof(rootIndicesSec, l, &numIndices)); in DMPlexComputeInjectorTree()
[all …]
|
| H A D | plex.c | 7838 …Modification(DM dm, PetscSection section, PetscInt numPoints, PetscInt numIndices, const PetscInt … in DMPlexAnchorsGetSubMatModification() argument
7947 …= numIndices, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Invalid size for closure %" PetscInt_FMT " should … in DMPlexAnchorsGetSubMatModification()
7988 PetscCall(DMGetWorkArray(dm, numIndices, MPIU_INT, &indices)); in DMPlexAnchorsGetSubMatModification()
7989 PetscCall(DMGetWorkArray(dm, numIndices, MPIU_INT, &tmpIndices)); in DMPlexAnchorsGetSubMatModification()
7993 for (PetscInt i = 0; i < numIndices; i++) indices[i] = -1; in DMPlexAnchorsGetSubMatModification()
7999 PetscCall(DMGetWorkArray(dm, numIndices * newNumIndices, MPIU_SCALAR, &modMat)); in DMPlexAnchorsGetSubMatModification()
8000 PetscCall(DMGetWorkArray(dm, numIndices * newNumIndices, MPIU_SCALAR, &tmpMat)); in DMPlexAnchorsGetSubMatModification()
8001 PetscCall(PetscArrayzero(modMat, newNumIndices * numIndices)); in DMPlexAnchorsGetSubMatModification()
8050 PetscCall(DMRestoreWorkArray(dm, numIndices * newNumIndices, MPIU_SCALAR, &tmpMat)); in DMPlexAnchorsGetSubMatModification()
8053 PetscCall(DMRestoreWorkArray(dm, numIndices, MPIU_INT, &tmpIndices)); in DMPlexAnchorsGetSubMatModification()
[all …]
|