PetscHeaderCreate

Synopsis

#define PetscHeaderCreate(h,tp,pops,cook,t,class_name,descr,mansec,com,des,vie) \
  (PetscNew(struct tp,&(h)) ||                                     \
   PetscNew(PetscOps,&(((PetscObject)(h))->bops)) ||                  \
   PetscNew(pops,&((h)->ops)) ||                                    \
   PetscHeaderCreate_Private((PetscObject)h,cook,t,class_name,descr,mansec,com,(PetscObjectFunction)des,(PetscObjectViewerFunction)vie) || \
   PetscLogObjectCreate(h) ||                                      \
   PetscLogObjectMemory(h, sizeof(struct tp) + sizeof(PetscOps) + sizeof(pops)))

PETSC_EXTERN PetscErrorCode PetscComposedQuantitiesDestroy(PetscObject obj);
PETSC_EXTERN PetscErrorCode PetscHeaderCreate_Private(PetscObject,PetscClassId,PetscInt,const char[],const char[],const char[],MPI_Comm,PetscErrorCode (*)(PetscObject*),PetscErrorCode (*)(PetscObject,PetscViewer));

/*@C
    PetscHeaderDestroy - Final step in destroying a PetscObject

    Input Parameters:
.   h - the header created with PetscHeaderCreate()

    

.seealso: PetscHeaderCreate()
@*/ 
#define PetscHeaderDestroy(h)                    \
  (PetscLogObjectDestroy((PetscObject)(*h)) ||     \
   PetscComposedQuantitiesDestroy((PetscObject)*h) || \
   PetscHeaderDestroy_Private((PetscObject)(*h)) || \
   PetscFree((*h)->ops) ||                       \
   PetscFree(*h))

PETSC_EXTERN PetscErrorCode PetscHeaderDestroy_Private(PetscObject);
PETSC_EXTERN PetscErrorCode PetscObjectCopyFortranFunctionPointers(PetscObject,PetscObject);

/* ---------------------------------------------------------------------------------------*/

#if !defined(PETSC_USE_DEBUG)

#define PetscValidHeaderSpecific(h,ck,arg) do

Input Parameters

Output Parameter