Actual source code: mp.h

  2: #include <petscdmmg.h>
  3: #include <petscdmcomposite.h>

  5: typedef struct {
  6:   PetscScalar u,v,omega;
  7: } Field1;

  9: typedef struct {
 10:   PetscScalar temp;
 11: } Field2;

 13: typedef struct {
 14:   PassiveReal  lidvelocity,prandtl,grashof;  /* physical parameters */
 15: } AppCtx;

 17: extern PetscErrorCode FormInitialGuessLocal1(DMDALocalInfo*,Field1**);
 18: extern PetscErrorCode FormFunctionLocal1(DMDALocalInfo*,Field1**,Field2**,Field1**,void*);

 20: extern PetscErrorCode FormInitialGuessLocal2(DMDALocalInfo*,Field2**,AppCtx*);
 21: extern PetscErrorCode FormFunctionLocal2(DMDALocalInfo*,Field1**,Field2**,Field2**,void*);