Actual source code: dmregall.c

  1: #include <petscdm.h>
  2: #include <petscdmplex.h>
  3: #include <petsc/private/dmimpl.h>
  4: #include <petsc/private/dmpleximpl.h>
  5: #include <petsc/private/petscfeimpl.h>
  6: #include <petsc/private/petscfvimpl.h>
  7: #include <petsc/private/petscdsimpl.h>
  8: PETSC_EXTERN PetscErrorCode DMCreate_DA(DM);
  9: PETSC_EXTERN PetscErrorCode DMCreate_Composite(DM);
 10: PETSC_EXTERN PetscErrorCode DMCreate_Sliced(DM);
 11: PETSC_EXTERN PetscErrorCode DMCreate_Shell(DM);
 12: PETSC_EXTERN PetscErrorCode DMCreate_Redundant(DM);
 13: PETSC_EXTERN PetscErrorCode DMCreate_Plex(DM);
 14: PETSC_EXTERN PetscErrorCode DMCreate_Patch(DM);
 15: PETSC_EXTERN PetscErrorCode DMCreate_Swarm(DM);
 16: #if PetscDefined(HAVE_MOAB)
 17: PETSC_EXTERN PetscErrorCode DMCreate_Moab(DM);
 18: #endif
 19: PETSC_EXTERN PetscErrorCode DMCreate_Network(DM);
 20: PETSC_EXTERN PetscErrorCode DMCreate_Forest(DM);
 21: #if PetscDefined(HAVE_P4EST)
 22: PETSC_EXTERN PetscErrorCode DMCreate_p4est(DM);
 23: PETSC_EXTERN PetscErrorCode DMCreate_p8est(DM);
 24: #endif
 25: PETSC_EXTERN PetscErrorCode DMCreate_Product(DM);
 26: PETSC_EXTERN PetscErrorCode DMCreate_Stag(DM);

 28: /*@
 29:   DMRegisterAll - Registers all of the DM components in the DM package.

 31:   Not Collective

 33:   Level: advanced

 35: .seealso: `DMRegister()`
 36: @*/
 37: PetscErrorCode DMRegisterAll(void)
 38: {
 39:   PetscFunctionBegin;
 40:   if (DMRegisterAllCalled) PetscFunctionReturn(PETSC_SUCCESS);
 41:   DMRegisterAllCalled = PETSC_TRUE;

 43:   PetscCall(DMRegister(DMDA, DMCreate_DA));
 44:   PetscCall(DMRegister(DMCOMPOSITE, DMCreate_Composite));
 45:   PetscCall(DMRegister(DMSLICED, DMCreate_Sliced));
 46:   PetscCall(DMRegister(DMSHELL, DMCreate_Shell));
 47:   PetscCall(DMRegister(DMREDUNDANT, DMCreate_Redundant));
 48:   PetscCall(DMRegister(DMPLEX, DMCreate_Plex));
 49:   PetscCall(DMRegister(DMPATCH, DMCreate_Patch));
 50:   PetscCall(DMRegister(DMSWARM, DMCreate_Swarm));
 51: #if PetscDefined(HAVE_MOAB)
 52:   PetscCall(DMRegister(DMMOAB, DMCreate_Moab));
 53: #endif
 54:   PetscCall(DMRegister(DMNETWORK, DMCreate_Network));
 55:   PetscCall(DMRegister(DMFOREST, DMCreate_Forest));
 56: #if PetscDefined(HAVE_P4EST)
 57:   PetscCall(DMRegister(DMP4EST, DMCreate_p4est));
 58:   PetscCall(DMRegister(DMP8EST, DMCreate_p8est));
 59: #endif
 60:   PetscCall(DMRegister(DMPRODUCT, DMCreate_Product));
 61:   PetscCall(DMRegister(DMSTAG, DMCreate_Stag));
 62:   PetscFunctionReturn(PETSC_SUCCESS);
 63: }

 65: #include <petscfe.h>

 67: PETSC_EXTERN PetscErrorCode PetscSpaceCreate_Polynomial(PetscSpace);
 68: PETSC_EXTERN PetscErrorCode PetscSpaceCreate_Ptrimmed(PetscSpace);
 69: PETSC_EXTERN PetscErrorCode PetscSpaceCreate_Tensor(PetscSpace);
 70: PETSC_EXTERN PetscErrorCode PetscSpaceCreate_Sum(PetscSpace);
 71: PETSC_EXTERN PetscErrorCode PetscSpaceCreate_Point(PetscSpace);
 72: PETSC_EXTERN PetscErrorCode PetscSpaceCreate_Subspace(PetscSpace);
 73: PETSC_EXTERN PetscErrorCode PetscSpaceCreate_WXY(PetscSpace);

 75: /*@
 76:   PetscSpaceRegisterAll - Registers all of the PetscSpace components in the PetscFE package.

 78:   Not Collective

 80:   Level: advanced

 82: .seealso: `PetscSpaceRegister()`
 83: @*/
 84: PetscErrorCode PetscSpaceRegisterAll(void)
 85: {
 86:   PetscFunctionBegin;
 87:   if (PetscSpaceRegisterAllCalled) PetscFunctionReturn(PETSC_SUCCESS);
 88:   PetscSpaceRegisterAllCalled = PETSC_TRUE;

 90:   PetscCall(PetscSpaceRegister(PETSCSPACEPOLYNOMIAL, PetscSpaceCreate_Polynomial));
 91:   PetscCall(PetscSpaceRegister(PETSCSPACEPTRIMMED, PetscSpaceCreate_Ptrimmed));
 92:   PetscCall(PetscSpaceRegister(PETSCSPACETENSOR, PetscSpaceCreate_Tensor));
 93:   PetscCall(PetscSpaceRegister(PETSCSPACESUM, PetscSpaceCreate_Sum));
 94:   PetscCall(PetscSpaceRegister(PETSCSPACEPOINT, PetscSpaceCreate_Point));
 95:   PetscCall(PetscSpaceRegister(PETSCSPACESUBSPACE, PetscSpaceCreate_Subspace));
 96:   PetscCall(PetscSpaceRegister(PETSCSPACEWXY, PetscSpaceCreate_WXY));
 97:   PetscFunctionReturn(PETSC_SUCCESS);
 98: }

100: PETSC_EXTERN PetscErrorCode PetscDualSpaceCreate_Lagrange(PetscDualSpace);
101: PETSC_EXTERN PetscErrorCode PetscDualSpaceCreate_Simple(PetscDualSpace);
102: PETSC_EXTERN PetscErrorCode PetscDualSpaceCreate_Refined(PetscDualSpace);
103: PETSC_EXTERN PetscErrorCode PetscDualSpaceCreate_Sum(PetscDualSpace);

105: /*@
106:   PetscDualSpaceRegisterAll - Registers all of the PetscDualSpace components in the PetscFE package.

108:   Not Collective

110:   Level: advanced

112: .seealso: `PetscDualSpaceRegister()`
113: @*/
114: PetscErrorCode PetscDualSpaceRegisterAll(void)
115: {
116:   PetscFunctionBegin;
117:   if (PetscDualSpaceRegisterAllCalled) PetscFunctionReturn(PETSC_SUCCESS);
118:   PetscDualSpaceRegisterAllCalled = PETSC_TRUE;

120:   PetscCall(PetscDualSpaceRegister(PETSCDUALSPACELAGRANGE, PetscDualSpaceCreate_Lagrange));
121:   PetscCall(PetscDualSpaceRegister(PETSCDUALSPACEBDM, PetscDualSpaceCreate_Lagrange));
122:   PetscCall(PetscDualSpaceRegister(PETSCDUALSPACESIMPLE, PetscDualSpaceCreate_Simple));
123:   PetscCall(PetscDualSpaceRegister(PETSCDUALSPACEREFINED, PetscDualSpaceCreate_Refined));
124:   PetscCall(PetscDualSpaceRegister(PETSCDUALSPACESUM, PetscDualSpaceCreate_Sum));
125:   PetscFunctionReturn(PETSC_SUCCESS);
126: }

128: PETSC_EXTERN PetscErrorCode PetscFECreate_Basic(PetscFE);
129: PETSC_EXTERN PetscErrorCode PetscFECreate_Composite(PetscFE);
130: #if PetscDefined(HAVE_OPENCL)
131: PETSC_EXTERN PetscErrorCode PetscFECreate_OpenCL(PetscFE);
132: #endif
133: PETSC_EXTERN PetscErrorCode PetscFECreate_Vector(PetscFE);

135: /*@
136:   PetscFERegisterAll - Registers all of the PetscFE components in the `PetscFE` package.

138:   Not Collective

140:   Level: advanced

142: .seealso: `PetscFERegister()`
143: @*/
144: PetscErrorCode PetscFERegisterAll(void)
145: {
146:   PetscFunctionBegin;
147:   if (PetscFERegisterAllCalled) PetscFunctionReturn(PETSC_SUCCESS);
148:   PetscFERegisterAllCalled = PETSC_TRUE;

150:   PetscCall(PetscFERegister(PETSCFEBASIC, PetscFECreate_Basic));
151:   PetscCall(PetscFERegister(PETSCFECOMPOSITE, PetscFECreate_Composite));
152: #if PetscDefined(HAVE_OPENCL)
153:   PetscCall(PetscFERegister(PETSCFEOPENCL, PetscFECreate_OpenCL));
154: #endif
155:   PetscCall(PetscFERegister(PETSCFEVECTOR, PetscFECreate_Vector));
156:   PetscFunctionReturn(PETSC_SUCCESS);
157: }
158: #include <petscfv.h>

160: PETSC_EXTERN PetscErrorCode PetscLimiterCreate_Sin(PetscLimiter);
161: PETSC_EXTERN PetscErrorCode PetscLimiterCreate_Zero(PetscLimiter);
162: PETSC_EXTERN PetscErrorCode PetscLimiterCreate_None(PetscLimiter);
163: PETSC_EXTERN PetscErrorCode PetscLimiterCreate_Minmod(PetscLimiter);
164: PETSC_EXTERN PetscErrorCode PetscLimiterCreate_VanLeer(PetscLimiter);
165: PETSC_EXTERN PetscErrorCode PetscLimiterCreate_VanAlbada(PetscLimiter);
166: PETSC_EXTERN PetscErrorCode PetscLimiterCreate_Superbee(PetscLimiter);
167: PETSC_EXTERN PetscErrorCode PetscLimiterCreate_MC(PetscLimiter);

169: /*@
170:   PetscLimiterRegisterAll - Registers all of the `PetscLimiter` components in the `PetscFV` package.

172:   Not Collective

174:   Level: advanced

176: .seealso: `PetscLimiterRegister()`
177: @*/
178: PetscErrorCode PetscLimiterRegisterAll(void)
179: {
180:   PetscFunctionBegin;
181:   if (PetscLimiterRegisterAllCalled) PetscFunctionReturn(PETSC_SUCCESS);
182:   PetscLimiterRegisterAllCalled = PETSC_TRUE;

184:   PetscCall(PetscLimiterRegister(PETSCLIMITERSIN, PetscLimiterCreate_Sin));
185:   PetscCall(PetscLimiterRegister(PETSCLIMITERZERO, PetscLimiterCreate_Zero));
186:   PetscCall(PetscLimiterRegister(PETSCLIMITERNONE, PetscLimiterCreate_None));
187:   PetscCall(PetscLimiterRegister(PETSCLIMITERMINMOD, PetscLimiterCreate_Minmod));
188:   PetscCall(PetscLimiterRegister(PETSCLIMITERVANLEER, PetscLimiterCreate_VanLeer));
189:   PetscCall(PetscLimiterRegister(PETSCLIMITERVANALBADA, PetscLimiterCreate_VanAlbada));
190:   PetscCall(PetscLimiterRegister(PETSCLIMITERSUPERBEE, PetscLimiterCreate_Superbee));
191:   PetscCall(PetscLimiterRegister(PETSCLIMITERMC, PetscLimiterCreate_MC));
192:   PetscFunctionReturn(PETSC_SUCCESS);
193: }

195: PETSC_EXTERN PetscErrorCode PetscFVCreate_Upwind(PetscFV);
196: PETSC_EXTERN PetscErrorCode PetscFVCreate_LeastSquares(PetscFV);

198: /*@
199:   PetscFVRegisterAll - Registers all of the `PetscFV` components in the `PetscFV` package.

201:   Not Collective

203:   Level: advanced

205: .seealso: `PetscFVRegister()`
206: @*/
207: PetscErrorCode PetscFVRegisterAll(void)
208: {
209:   PetscFunctionBegin;
210:   if (PetscFVRegisterAllCalled) PetscFunctionReturn(PETSC_SUCCESS);
211:   PetscFVRegisterAllCalled = PETSC_TRUE;

213:   PetscCall(PetscFVRegister(PETSCFVUPWIND, PetscFVCreate_Upwind));
214:   PetscCall(PetscFVRegister(PETSCFVLEASTSQUARES, PetscFVCreate_LeastSquares));
215:   PetscFunctionReturn(PETSC_SUCCESS);
216: }
217: #include <petscds.h>

219: PETSC_EXTERN PetscErrorCode PetscDSCreate_Basic(PetscDS);

221: /*@
222:   PetscDSRegisterAll - Registers all of the `PetscDS` components in the `PetscDS` package.

224:   Not Collective

226:   Level: advanced

228: .seealso: `PetscDSRegister()`
229: @*/
230: PetscErrorCode PetscDSRegisterAll(void)
231: {
232:   PetscFunctionBegin;
233:   if (PetscDSRegisterAllCalled) PetscFunctionReturn(PETSC_SUCCESS);
234:   PetscDSRegisterAllCalled = PETSC_TRUE;

236:   PetscCall(PetscDSRegister(PETSCDSBASIC, PetscDSCreate_Basic));
237:   PetscFunctionReturn(PETSC_SUCCESS);
238: }