1*a3101111SPatrick Sanan #if !defined(DMSTAG_H_) 2*a3101111SPatrick Sanan #define DMSTAG_H_ 3*a3101111SPatrick Sanan 4*a3101111SPatrick Sanan #include <petscdm.h> 5*a3101111SPatrick Sanan #include <petscdmproduct.h> 6*a3101111SPatrick Sanan 7*a3101111SPatrick Sanan /*E 8*a3101111SPatrick Sanan DMStagStencilLocation - enumerated type denoted a location relative to an element in a DMStag grid 9*a3101111SPatrick Sanan 10*a3101111SPatrick Sanan The interpretation of these values is dimension-dependent. 11*a3101111SPatrick Sanan 12*a3101111SPatrick Sanan Level: beginner 13*a3101111SPatrick Sanan 14*a3101111SPatrick Sanan .seealso: DMSTAG, DMStagStencil, DMStagGetLocationSlot() 15*a3101111SPatrick Sanan E*/ 16*a3101111SPatrick Sanan typedef enum { 17*a3101111SPatrick Sanan DMSTAG_NULL_LOCATION=0, 18*a3101111SPatrick Sanan DMSTAG_BACK_DOWN_LEFT, 19*a3101111SPatrick Sanan DMSTAG_BACK_DOWN, 20*a3101111SPatrick Sanan DMSTAG_BACK_DOWN_RIGHT, 21*a3101111SPatrick Sanan DMSTAG_BACK_LEFT, 22*a3101111SPatrick Sanan DMSTAG_BACK, 23*a3101111SPatrick Sanan DMSTAG_BACK_RIGHT, 24*a3101111SPatrick Sanan DMSTAG_BACK_UP_LEFT, 25*a3101111SPatrick Sanan DMSTAG_BACK_UP, 26*a3101111SPatrick Sanan DMSTAG_BACK_UP_RIGHT, 27*a3101111SPatrick Sanan DMSTAG_DOWN_LEFT, 28*a3101111SPatrick Sanan DMSTAG_DOWN, 29*a3101111SPatrick Sanan DMSTAG_DOWN_RIGHT, 30*a3101111SPatrick Sanan DMSTAG_LEFT, 31*a3101111SPatrick Sanan DMSTAG_ELEMENT, 32*a3101111SPatrick Sanan DMSTAG_RIGHT, 33*a3101111SPatrick Sanan DMSTAG_UP_LEFT, 34*a3101111SPatrick Sanan DMSTAG_UP, 35*a3101111SPatrick Sanan DMSTAG_UP_RIGHT, 36*a3101111SPatrick Sanan DMSTAG_FRONT_DOWN_LEFT, 37*a3101111SPatrick Sanan DMSTAG_FRONT_DOWN, 38*a3101111SPatrick Sanan DMSTAG_FRONT_DOWN_RIGHT, 39*a3101111SPatrick Sanan DMSTAG_FRONT_LEFT, 40*a3101111SPatrick Sanan DMSTAG_FRONT, 41*a3101111SPatrick Sanan DMSTAG_FRONT_RIGHT, 42*a3101111SPatrick Sanan DMSTAG_FRONT_UP_LEFT, 43*a3101111SPatrick Sanan DMSTAG_FRONT_UP, 44*a3101111SPatrick Sanan DMSTAG_FRONT_UP_RIGHT 45*a3101111SPatrick Sanan } DMStagStencilLocation; 46*a3101111SPatrick Sanan PETSC_EXTERN const char *const DMStagStencilLocations[]; /* Corresponding strings (see stagstencil.c) */ 47*a3101111SPatrick Sanan 48*a3101111SPatrick Sanan /*S 49*a3101111SPatrick Sanan DMStagStencil - data structure representing a degree of freedom on a DMStag grid 50*a3101111SPatrick Sanan 51*a3101111SPatrick Sanan Data structure (C struct), analogous to describing a degree of freedom associated with a DMStag object, 52*a3101111SPatrick Sanan in terms of a global element index in each of up to three directions, a "location" as defined by DMStagStencilLocation, 53*a3101111SPatrick Sanan and a component number. Primarily for use with DMStagMatSetValuesStencil() (compare with use of MatStencil with MatSetValuesStencil()). 54*a3101111SPatrick Sanan 55*a3101111SPatrick Sanan Note: 56*a3101111SPatrick 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). 57*a3101111SPatrick Sanan 58*a3101111SPatrick Sanan Level: beginner 59*a3101111SPatrick Sanan 60*a3101111SPatrick Sanan .seealso: DMSTAG, DMStagMatSetValuesStencil(), DMStagVecSetValuesStencil(), DMStagStencilLocation, DMStagSetStencilWidth(), DMStagSetStencilType(), DMStagVecGetValuesStencil() 61*a3101111SPatrick Sanan S*/ 62*a3101111SPatrick Sanan typedef struct { 63*a3101111SPatrick Sanan DMStagStencilLocation loc; 64*a3101111SPatrick Sanan PetscInt i,j,k,c; 65*a3101111SPatrick Sanan } DMStagStencil; 66*a3101111SPatrick Sanan 67*a3101111SPatrick Sanan /*E 68*a3101111SPatrick Sanan DMStagStencilType - Elementwise stencil type, determining which neighbors participate in communication 69*a3101111SPatrick Sanan 70*a3101111SPatrick Sanan Level: beginner 71*a3101111SPatrick Sanan 72*a3101111SPatrick Sanan .seealso: DMSTAG, DMStagCreate1d(), DMStagCreate2d(), DMStagCreate3d(), DMStagStencil 73*a3101111SPatrick Sanan E*/ 74*a3101111SPatrick Sanan 75*a3101111SPatrick Sanan typedef enum{DMSTAG_STENCIL_NONE=0,DMSTAG_STENCIL_STAR,DMSTAG_STENCIL_BOX} DMStagStencilType; 76*a3101111SPatrick Sanan PETSC_EXTERN const char *const DMStagStencilTypes[]; /* Corresponding strings (see stagstencil.c) */ 77*a3101111SPatrick Sanan 78*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMCreate_Stag(DM); 79*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagCreate1d(MPI_Comm,DMBoundaryType,PetscInt,PetscInt,PetscInt,DMStagStencilType,PetscInt,const PetscInt[],DM*); 80*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagCreate2d(MPI_Comm,DMBoundaryType,DMBoundaryType,PetscInt,PetscInt,PetscInt,PetscInt,PetscInt,PetscInt,PetscInt,DMStagStencilType,PetscInt,const PetscInt[],const PetscInt[],DM*); 81*a3101111SPatrick 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*); 82*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetBoundaryTypes(DM,DMBoundaryType*,DMBoundaryType*,DMBoundaryType*); 83*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGet1dCoordinateArraysDOFRead(DM,void*,void*,void*); 84*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGet1dCoordinateLocationSlot(DM,DMStagStencilLocation,PetscInt*); 85*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetCorners(DM,PetscInt*,PetscInt*,PetscInt*,PetscInt*,PetscInt*,PetscInt*,PetscInt*,PetscInt*,PetscInt*); 86*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetDOF(DM,PetscInt*,PetscInt*,PetscInt*,PetscInt*); 87*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetEntriesPerElement(DM,PetscInt*); 88*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetLocationDOF(DM,DMStagStencilLocation,PetscInt*); 89*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetLocationSlot(DM,DMStagStencilLocation,PetscInt,PetscInt*); 90*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetGhostCorners(DM,PetscInt*,PetscInt*,PetscInt*,PetscInt*,PetscInt*,PetscInt*); 91*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetStencilWidth(DM,PetscInt*); 92*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetGlobalSizes(DM,PetscInt*,PetscInt*,PetscInt*); 93*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetIsFirstRank(DM,PetscBool*,PetscBool*,PetscBool*); 94*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetIsLastRank(DM,PetscBool*,PetscBool*,PetscBool*); 95*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetLocalSizes(DM,PetscInt*,PetscInt*,PetscInt*); 96*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagGetNumRanks(DM,PetscInt*,PetscInt*,PetscInt*); 97*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagCreateCompatibleDMStag(DM,PetscInt,PetscInt,PetscInt,PetscInt,DM*); 98*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagMigrateVec(DM,Vec,DM,Vec); 99*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagMatSetValuesStencil(DM,Mat,PetscInt,const DMStagStencil*,PetscInt,const DMStagStencil*,const PetscScalar*,InsertMode); 100*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagRestore1dCoordinateArraysDOFRead(DM,void*,void*,void*); 101*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagSetBoundaryTypes(DM,DMBoundaryType,DMBoundaryType,DMBoundaryType); 102*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagSetCoordinateDMType(DM,DMType); 103*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagSetDOF(DM,PetscInt,PetscInt,PetscInt,PetscInt); 104*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagSetGlobalSizes(DM,PetscInt,PetscInt,PetscInt); 105*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagSetNumRanks(DM,PetscInt,PetscInt,PetscInt); 106*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagSetOwnershipRanges(DM,PetscInt const *,PetscInt const *,PetscInt const *); 107*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagSetUniformCoordinates(DM,PetscReal,PetscReal,PetscReal,PetscReal,PetscReal,PetscReal); 108*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagSetUniformCoordinatesExplicit(DM,PetscReal,PetscReal,PetscReal,PetscReal,PetscReal,PetscReal); 109*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagSetUniformCoordinatesProduct(DM,PetscReal,PetscReal,PetscReal,PetscReal,PetscReal,PetscReal); 110*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagVecSplitToDMDA(DM,Vec,DMStagStencilLocation,PetscInt,DM*,Vec*); 111*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagVecGetArrayDOF(DM,Vec,void*); 112*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagVecGetArrayDOFRead(DM,Vec,void*); 113*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagVecRestoreArrayDOF(DM,Vec,void*); 114*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagVecRestoreArrayDOFRead(DM,Vec,void*); 115*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagVecGetValuesStencil(DM,Vec,PetscInt,const DMStagStencil*,PetscScalar*); 116*a3101111SPatrick Sanan PETSC_EXTERN PetscErrorCode DMStagVecSetValuesStencil(DM,Vec,PetscInt,const DMStagStencil*,const PetscScalar*,InsertMode); 117*a3101111SPatrick Sanan 118*a3101111SPatrick Sanan #endif 119