Home
last modified time | relevance | path

Searched refs:closureA (Results 1 – 4 of 4) sorted by relevance

/petsc/src/dm/impls/plex/tests/
H A Dex26f90.F9062 PetscInt, dimension(:), pointer :: closureA, closure
239 nullify (closureA)
240 …PetscCallA(DMPlexGetTransitiveClosure(dm, cellID(1), PETSC_TRUE, PETSC_NULL_INTEGER, closureA, ier…
241 select case (size(closureA)/2)
275 write (IOBuffer, '("Unknown element with closure size ",I2)') size(closureA)/2
278 …allA(DMPlexRestoreTransitiveClosure(dm, cellID(1), PETSC_TRUE, PETSC_NULL_INTEGER, closureA, ierr))
H A Dex62f90.F9045 PetscInt, dimension(:), pointer :: closureA, closure
222 nullify (closureA)
223 …scCallA(DMPlexGetTransitiveClosure(pdm, cellID(1), PETSC_TRUE, PETSC_NULL_INTEGER, closureA, ierr))
224 select case (size(closureA)/2)
258 write (IOBuffer, '("Unknown element with closure size ",I2)') size(closureA)/2
261 …llA(DMPlexRestoreTransitiveClosure(pdm, cellID(1), PETSC_TRUE, PETSC_NULL_INTEGER, closureA, ierr))
H A Dex26.c152 PetscInt numCells, cell, closureSize, *closureA = NULL; in main() local
192 PetscCall(DMPlexGetTransitiveClosure(dm, cellID[0], PETSC_TRUE, &closureSize, &closureA)); in main()
233 PetscCall(DMPlexRestoreTransitiveClosure(dm, cellID[0], PETSC_TRUE, &closureSize, &closureA)); in main()
H A Dex64.c72 PetscInt numCells, cell, closureSize, *closureA = NULL; in main() local
112 PetscCall(DMPlexGetTransitiveClosure(dm, cellID[0], PETSC_TRUE, &closureSize, &closureA)); in main()
153 PetscCall(DMPlexRestoreTransitiveClosure(dm, cellID[0], PETSC_TRUE, &closureSize, &closureA)); in main()