2: #include <petsc-private/dmdaimpl.h>    /*I   "petscdmda.h"   I*/


  7: /*@C
  8:    DMDACreatePF - Creates an appropriately dimensioned PF mathematical function object
  9:       from a DMDA.

 11:    Collective on DMDA

 13:    Input Parameter:
 14: .  da - initial distributed array

 16:    Output Parameter:
 17: .  pf - the mathematical function object

 19:    Level: advanced


 22: .keywords:  distributed array, grid function

 24: .seealso: DMDACreate1d(), DMDACreate2d(), DMDACreate3d(), DMDestroy(), DMCreateGlobalVector()
 25: @*/
 26: PetscErrorCode  DMDACreatePF(DM da,PF *pf)
 27: {
 29:   DM_DA          *dd = (DM_DA*)da->data;

 34:   PFCreate(PetscObjectComm((PetscObject)da),dd->dim,dd->w,pf);
 35:   return(0);
 36: }