1a4963045SJacob Faibussowitsch #pragma once 2a3101111SPatrick Sanan 3a3101111SPatrick Sanan #include <petscdm.h> 4a3101111SPatrick Sanan #include <petscdmproduct.h> 5a3101111SPatrick Sanan 6ac09b921SBarry Smith /* SUBMANSEC = DMStag */ 7ac09b921SBarry Smith 8a3101111SPatrick Sanan /*E 9430667deSBarry Smith DMStagStencilLocation - enumerated type denoting a location relative to an element in a `DMSTAG` grid 10a3101111SPatrick Sanan 11a3101111SPatrick Sanan The interpretation of these values is dimension-dependent. 12a3101111SPatrick Sanan 13a3101111SPatrick Sanan Level: beginner 14a3101111SPatrick Sanan 15430667deSBarry Smith Developer Note: 16430667deSBarry Smith The order of the enum entries is significant, as it corresponds to the canonical numbering 17430667deSBarry Smith of DOFs, and the fact that the numbering starts at 0 may also be used by the implementation. 1815348b7aSPatrick Sanan 1995bd0b28SBarry Smith .seealso: [](ch_stag), `DMSTAG`, `DMDA`, `DMStagStencil`, `DMStagGetLocationSlot()`, `DMStagStencilType` 20430667deSBarry Smith E*/ 21a3101111SPatrick Sanan typedef enum { 22a3101111SPatrick Sanan DMSTAG_NULL_LOCATION = 0, 23a3101111SPatrick Sanan DMSTAG_BACK_DOWN_LEFT, 24a3101111SPatrick Sanan DMSTAG_BACK_DOWN, 25a3101111SPatrick Sanan DMSTAG_BACK_DOWN_RIGHT, 26a3101111SPatrick Sanan DMSTAG_BACK_LEFT, 27a3101111SPatrick Sanan DMSTAG_BACK, 28a3101111SPatrick Sanan DMSTAG_BACK_RIGHT, 29a3101111SPatrick Sanan DMSTAG_BACK_UP_LEFT, 30a3101111SPatrick Sanan DMSTAG_BACK_UP, 31a3101111SPatrick Sanan DMSTAG_BACK_UP_RIGHT, 32a3101111SPatrick Sanan DMSTAG_DOWN_LEFT, 33a3101111SPatrick Sanan DMSTAG_DOWN, 34a3101111SPatrick Sanan DMSTAG_DOWN_RIGHT, 35a3101111SPatrick Sanan DMSTAG_LEFT, 36a3101111SPatrick Sanan DMSTAG_ELEMENT, 37a3101111SPatrick Sanan DMSTAG_RIGHT, 38a3101111SPatrick Sanan DMSTAG_UP_LEFT, 39a3101111SPatrick Sanan DMSTAG_UP, 40a3101111SPatrick Sanan DMSTAG_UP_RIGHT, 41a3101111SPatrick Sanan DMSTAG_FRONT_DOWN_LEFT, 42a3101111SPatrick Sanan DMSTAG_FRONT_DOWN, 43a3101111SPatrick Sanan DMSTAG_FRONT_DOWN_RIGHT, 44a3101111SPatrick Sanan DMSTAG_FRONT_LEFT, 45a3101111SPatrick Sanan DMSTAG_FRONT, 46a3101111SPatrick Sanan DMSTAG_FRONT_RIGHT, 47a3101111SPatrick Sanan DMSTAG_FRONT_UP_LEFT, 48a3101111SPatrick Sanan DMSTAG_FRONT_UP, 49a3101111SPatrick Sanan DMSTAG_FRONT_UP_RIGHT 50a3101111SPatrick Sanan } DMStagStencilLocation; 51a3101111SPatrick Sanan PETSC_EXTERN const char *const DMStagStencilLocations[]; /* Corresponding strings (see stagstencil.c) */ 52a3101111SPatrick Sanan 53a3101111SPatrick Sanan /*S 5487497f52SBarry Smith DMStagStencil - data structure representing a degree of freedom on a `DMSTAG` grid 55a3101111SPatrick Sanan 5687497f52SBarry Smith Data structure (C struct), analogous to describing a degree of freedom associated with a `DMSTAG` object, 5787497f52SBarry Smith in terms of a global element index in each of up to three directions, a "location" as defined by `DMStagStencilLocation`, 5887497f52SBarry Smith and a component number. Primarily for use with `DMStagMatSetValuesStencil()` (compare with use of `MatStencil` with `MatSetValuesStencil()`). 59a3101111SPatrick Sanan 6016a05f60SBarry Smith Level: beginner 6116a05f60SBarry Smith 62a3101111SPatrick Sanan Note: 63a3101111SPatrick Sanan The component (c) field must always be set, even if there is a single component at a given location (in which case c should be set to 0). 64a3101111SPatrick Sanan 6595bd0b28SBarry Smith .seealso: [](ch_stag), `DMSTAG`, `DMDA`, `DMStagMatSetValuesStencil()`, `DMStagVecSetValuesStencil()`, `DMStagStencilLocation`, `DMStagSetStencilWidth()`, 66430667deSBarry Smith `DMStagSetStencilType()`, `DMStagVecGetValuesStencil()`, `DMStagStencilLocation` 67a3101111SPatrick Sanan S*/ 68a3101111SPatrick Sanan typedef struct { 69a3101111SPatrick Sanan DMStagStencilLocation loc; 70a3101111SPatrick Sanan PetscInt i, j, k, c; 71a3101111SPatrick Sanan } DMStagStencil; 72a3101111SPatrick Sanan 73a3101111SPatrick Sanan /*E 74a3101111SPatrick Sanan DMStagStencilType - Elementwise stencil type, determining which neighbors participate in communication 75a3101111SPatrick Sanan 76a3101111SPatrick Sanan Level: beginner 77a3101111SPatrick Sanan 78af27ebaaSBarry Smith .seealso: [](ch_stag), `DMSTAG`, `DMDA`, `DMStagCreate1d()`, `DMStagCreate2d()`, `DMStagCreate3d()`, `DMStagStencil`, `DMDAStencilType`, `DMStagStencilLocation`, 79af27ebaaSBarry Smith `DMDAStencilType` 80a3101111SPatrick Sanan E*/ 81a3101111SPatrick Sanan 829371c9d4SSatish Balay typedef enum { 839371c9d4SSatish Balay DMSTAG_STENCIL_NONE = 0, 849371c9d4SSatish Balay DMSTAG_STENCIL_STAR, 859371c9d4SSatish Balay DMSTAG_STENCIL_BOX 869371c9d4SSatish Balay } DMStagStencilType; 87a3101111SPatrick Sanan PETSC_EXTERN const char *const DMStagStencilTypes[]; /* Corresponding strings (see stagstencil.c) */ 88a3101111SPatrick Sanan 89a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMCreate_Stag(DM); 90a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagCreate1d(MPI_Comm, DMBoundaryType, PetscInt, PetscInt, PetscInt, DMStagStencilType, PetscInt, const PetscInt[], DM *); 91a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagCreate2d(MPI_Comm, DMBoundaryType, DMBoundaryType, PetscInt, PetscInt, PetscInt, PetscInt, PetscInt, PetscInt, PetscInt, DMStagStencilType, PetscInt, const PetscInt[], const PetscInt[], DM *); 92a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagCreate3d(MPI_Comm, DMBoundaryType, DMBoundaryType, DMBoundaryType, PetscInt, PetscInt, PetscInt, PetscInt, PetscInt, PetscInt, PetscInt, PetscInt, PetscInt, PetscInt, DMStagStencilType, PetscInt, const PetscInt[], const PetscInt[], const PetscInt[], DM *); 93c0ec7fa4SChris Eldred PETSC_EXTERN PetscErrorCode DMStagCreateCompatibleDMStag(DM, PetscInt, PetscInt, PetscInt, PetscInt, DM *); 94d5a0052aSPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagCreateISFromStencils(DM, PetscInt, DMStagStencil *, IS *); 95c0ec7fa4SChris Eldred PETSC_EXTERN PetscErrorCode DMStagGetBoundaryTypes(DM, DMBoundaryType *, DMBoundaryType *, DMBoundaryType *); 96a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetCorners(DM, PetscInt *, PetscInt *, PetscInt *, PetscInt *, PetscInt *, PetscInt *, PetscInt *, PetscInt *, PetscInt *); 97a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetDOF(DM, PetscInt *, PetscInt *, PetscInt *, PetscInt *); 9818edee0eSPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetEntries(DM, PetscInt *); 99a35824b0SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetEntriesLocal(DM, PetscInt *); 100a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetEntriesPerElement(DM, PetscInt *); 101a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetGhostCorners(DM, PetscInt *, PetscInt *, PetscInt *, PetscInt *, PetscInt *, PetscInt *); 102a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetGlobalSizes(DM, PetscInt *, PetscInt *, PetscInt *); 103a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetIsFirstRank(DM, PetscBool *, PetscBool *, PetscBool *); 104a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetIsLastRank(DM, PetscBool *, PetscBool *, PetscBool *); 105a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetLocalSizes(DM, PetscInt *, PetscInt *, PetscInt *); 106c0ec7fa4SChris Eldred PETSC_EXTERN PetscErrorCode DMStagGetLocationDOF(DM, DMStagStencilLocation, PetscInt *); 107c0ec7fa4SChris Eldred PETSC_EXTERN PetscErrorCode DMStagGetLocationSlot(DM, DMStagStencilLocation, PetscInt, PetscInt *); 108a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetNumRanks(DM, PetscInt *, PetscInt *, PetscInt *); 109c0ec7fa4SChris Eldred PETSC_EXTERN PetscErrorCode DMStagGetOwnershipRanges(DM, const PetscInt **, const PetscInt **, const PetscInt **); 1101d60c44bSPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetProductCoordinateArrays(DM, void *, void *, void *); 1111d60c44bSPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetProductCoordinateArraysRead(DM, void *, void *, void *); 1121d60c44bSPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetProductCoordinateLocationSlot(DM, DMStagStencilLocation, PetscInt *); 113995a9760SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetStencilType(DM, DMStagStencilType *); 114c0ec7fa4SChris Eldred PETSC_EXTERN PetscErrorCode DMStagGetStencilWidth(DM, PetscInt *); 115*a4211a7fSJeongu Kim PETSC_EXTERN PetscErrorCode DMStagGetRefinementFactor(DM, PetscInt *, PetscInt *, PetscInt *); 116afea8018SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagMatGetValuesStencil(DM, Mat, PetscInt, const DMStagStencil *, PetscInt, const DMStagStencil *, PetscScalar *); 117a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagMatSetValuesStencil(DM, Mat, PetscInt, const DMStagStencil *, PetscInt, const DMStagStencil *, const PetscScalar *, InsertMode); 118c0ec7fa4SChris Eldred PETSC_EXTERN PetscErrorCode DMStagMigrateVec(DM, Vec, DM, Vec); 119d844a136SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagPopulateLocalToGlobalInjective(DM); 1201d60c44bSPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagRestoreProductCoordinateArrays(DM, void *, void *, void *); 1211d60c44bSPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagRestoreProductCoordinateArraysRead(DM, void *, void *, void *); 122dff67f20SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagRestrictSimple(DM, Vec, DM, Vec); 123a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagSetBoundaryTypes(DM, DMBoundaryType, DMBoundaryType, DMBoundaryType); 124a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagSetCoordinateDMType(DM, DMType); 125a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagSetDOF(DM, PetscInt, PetscInt, PetscInt, PetscInt); 126a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagSetGlobalSizes(DM, PetscInt, PetscInt, PetscInt); 127a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagSetNumRanks(DM, PetscInt, PetscInt, PetscInt); 128a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagSetOwnershipRanges(DM, PetscInt const *, PetscInt const *, PetscInt const *); 129995a9760SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagSetStencilType(DM, DMStagStencilType); 130c0ec7fa4SChris Eldred PETSC_EXTERN PetscErrorCode DMStagSetStencilWidth(DM, PetscInt); 131*a4211a7fSJeongu Kim PETSC_EXTERN PetscErrorCode DMStagSetRefinementFactor(DM, PetscInt, PetscInt, PetscInt); 132a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagSetUniformCoordinates(DM, PetscReal, PetscReal, PetscReal, PetscReal, PetscReal, PetscReal); 133a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagSetUniformCoordinatesExplicit(DM, PetscReal, PetscReal, PetscReal, PetscReal, PetscReal, PetscReal); 134a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagSetUniformCoordinatesProduct(DM, PetscReal, PetscReal, PetscReal, PetscReal, PetscReal, PetscReal); 1353c4d7291SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagStencilToIndexLocal(DM, PetscInt, PetscInt, const DMStagStencil *, PetscInt *); 136b5700429SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagVecGetArray(DM, Vec, void *); 137b5700429SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagVecGetArrayRead(DM, Vec, void *); 138c0ec7fa4SChris Eldred PETSC_EXTERN PetscErrorCode DMStagVecGetValuesStencil(DM, Vec, PetscInt, const DMStagStencil *, PetscScalar *); 139b5700429SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagVecRestoreArray(DM, Vec, void *); 140b5700429SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagVecRestoreArrayRead(DM, Vec, void *); 141a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagVecSetValuesStencil(DM, Vec, PetscInt, const DMStagStencil *, const PetscScalar *, InsertMode); 142c0ec7fa4SChris Eldred PETSC_EXTERN PetscErrorCode DMStagVecSplitToDMDA(DM, Vec, DMStagStencilLocation, PetscInt, DM *, Vec *); 143a3101111SPatrick Sanan 144edd03b47SJacob Faibussowitsch PETSC_DEPRECATED_FUNCTION(3, 13, 0, "DMStagGetProductCoordinateArraysRead()", ) static inline PetscErrorCode DMStagGet1dCoordinateArraysDOFRead(DM dm, void *ax, void *ay, void *az) 145d71ae5a4SJacob Faibussowitsch { 1469371c9d4SSatish Balay return DMStagGetProductCoordinateArraysRead(dm, ax, ay, az); 1479371c9d4SSatish Balay } 148edd03b47SJacob Faibussowitsch PETSC_DEPRECATED_FUNCTION(3, 13, 0, "DMStagGetProductCoordinateLocationSlot()", ) static inline PetscErrorCode DMStagGet1dCoordinateLocationSlot(DM dm, DMStagStencilLocation loc, PetscInt *s) 149d71ae5a4SJacob Faibussowitsch { 1509371c9d4SSatish Balay return DMStagGetProductCoordinateLocationSlot(dm, loc, s); 1519371c9d4SSatish Balay } 152edd03b47SJacob Faibussowitsch PETSC_DEPRECATED_FUNCTION(3, 11, 0, "DMStagGetStencilType()", ) static inline PetscErrorCode DMStagGetGhostType(DM dm, DMStagStencilType *s) 153d71ae5a4SJacob Faibussowitsch { 1549371c9d4SSatish Balay return DMStagGetStencilType(dm, s); 1559371c9d4SSatish Balay } 156edd03b47SJacob Faibussowitsch PETSC_DEPRECATED_FUNCTION(3, 13, 0, "DMStagRestoreProductCoordinateArraysRead()", ) static inline PetscErrorCode DMStagRestore1dCoordinateArraysDOFRead(DM dm, void *ax, void *ay, void *az) 157d71ae5a4SJacob Faibussowitsch { 1589371c9d4SSatish Balay return DMStagRestoreProductCoordinateArraysRead(dm, ax, ay, az); 1599371c9d4SSatish Balay } 160edd03b47SJacob Faibussowitsch PETSC_DEPRECATED_FUNCTION(3, 11, 0, "DMStagSetStencilType()", ) static inline PetscErrorCode DMStagSetGhostType(DM dm, DMStagStencilType *s) 161d71ae5a4SJacob Faibussowitsch { 1629371c9d4SSatish Balay return DMStagGetStencilType(dm, s); 1639371c9d4SSatish Balay } 164edd03b47SJacob Faibussowitsch PETSC_DEPRECATED_FUNCTION(3, 13, 0, "DMStagVecGetArray()", ) static inline PetscErrorCode DMStagVecGetArrayDOF(DM dm, Vec v, void *a) 165d71ae5a4SJacob Faibussowitsch { 1669371c9d4SSatish Balay return DMStagVecGetArray(dm, v, a); 1679371c9d4SSatish Balay } 168edd03b47SJacob Faibussowitsch PETSC_DEPRECATED_FUNCTION(3, 13, 0, "DMStagVecGetArrayRead()", ) static inline PetscErrorCode DMStagVecGetArrayDOFRead(DM dm, Vec v, void *a) 169d71ae5a4SJacob Faibussowitsch { 1709371c9d4SSatish Balay return DMStagVecGetArrayRead(dm, v, a); 1719371c9d4SSatish Balay } 172edd03b47SJacob Faibussowitsch PETSC_DEPRECATED_FUNCTION(3, 13, 0, "DMStagVecRestoreArray()", ) static inline PetscErrorCode DMStagVecRestoreArrayDOF(DM dm, Vec v, void *a) 173d71ae5a4SJacob Faibussowitsch { 1749371c9d4SSatish Balay return DMStagVecRestoreArray(dm, v, a); 1759371c9d4SSatish Balay } 176edd03b47SJacob Faibussowitsch PETSC_DEPRECATED_FUNCTION(3, 13, 0, "DMStagVecRestoreArrayRead()", ) static inline PetscErrorCode DMStagVecRestoreArrayDOFRead(DM dm, Vec v, void *a) 177d71ae5a4SJacob Faibussowitsch { 1789371c9d4SSatish Balay return DMStagVecRestoreArrayRead(dm, v, a); 1799371c9d4SSatish Balay } 180