17c307921SBarry Smith 27c307921SBarry Smith #if !defined(__PETSCBAG_H) 37c307921SBarry Smith #define __PETSCBAG_H 47c307921SBarry Smith #include "petsc.h" 57c307921SBarry Smith PETSC_EXTERN_CXX_BEGIN 67c307921SBarry Smith 77c307921SBarry Smith /*S 87c307921SBarry Smith PetscBag - PETSc object that manages a collection of user data including parameters. 9f588057bSBarry Smith A bag is essentially a C struct with serialization (you can save it and load it from files). 107c307921SBarry Smith 117c307921SBarry Smith Level: beginner 127c307921SBarry Smith 137c307921SBarry Smith Sample Usage: 147c307921SBarry Smith $ typedef struct { 157c307921SBarry Smith $ PetscInt height; 167c307921SBarry Smith $ PetscScalar root; 177c307921SBarry Smith $ PetscReal byebye; 187c307921SBarry Smith $ } MyParameters; 197c307921SBarry Smith $ 20b29011acSSatish Balay $ PetscBag bag; 217c307921SBarry Smith $ MyParameters *params; 227c307921SBarry Smith $ 23*f621e05eSBarry Smith $ ierr = PetscBagCreate(PETSC_COMM_WORLD,sizeof(MyParameters),&bag); 24b29011acSSatish Balay $ ierr = PetscBagGetData(bag,(void **)¶ms); 25*f621e05eSBarry Smith $ ierr = PetscBagSetName(bag,"MyParameters"); 26*f621e05eSBarry Smith $ ierr = PetscBagRegisterInt(bag,¶ms.height,22,"height","Height of the water tower"); 277c307921SBarry Smith $ 287c307921SBarry Smith 29b29011acSSatish Balay .seealso: PetscBagSetName(), PetscBagGetName(), PetscBagView(), PetscBagLoad(), PetscBagGetData() 307c307921SBarry Smith PetscBagRegisterReal(), PetscBagRegisterInt(), PetscBagRegisterTruth(), PetscBagRegisterScalar() 319dcbbd2bSBarry Smith PetscBagSetFromOptions(), PetscBagRegisterVec(), PetscBagCreate(), PetscBagDestroy(), PetscBagRegisterEnum() 327c307921SBarry Smith S*/ 33b29011acSSatish Balay typedef struct _n_PetscBag* PetscBag; 34b29011acSSatish Balay typedef struct _n_PetscBagItem* PetscBagItem; 35f588057bSBarry Smith 36b29011acSSatish Balay extern PetscErrorCode PetscBagCreate(MPI_Comm,size_t,PetscBag*); 37b29011acSSatish Balay extern PetscErrorCode PetscBagDestroy(PetscBag); 38b29011acSSatish Balay extern PetscErrorCode PetscBagGetData(PetscBag,void **); 39b29011acSSatish Balay extern PetscErrorCode PetscBagRegisterReal(PetscBag,void*,PetscReal, const char*, const char*); 40b29011acSSatish Balay extern PetscErrorCode PetscBagRegisterString(PetscBag,void*,PetscInt,const char*, const char*, const char*); 41b29011acSSatish Balay extern PetscErrorCode PetscBagRegisterScalar(PetscBag,void*,PetscScalar,const char*,const char*); 42b29011acSSatish Balay extern PetscErrorCode PetscBagRegisterInt(PetscBag,void*,PetscInt,const char*,const char*); 43b29011acSSatish Balay extern PetscErrorCode PetscBagRegisterEnum(PetscBag,void*,const char*[],PetscEnum,const char*,const char*); 44b29011acSSatish Balay extern PetscErrorCode PetscBagRegisterTruth(PetscBag,void*,PetscTruth,const char*,const char*); 45f588057bSBarry Smith 46b29011acSSatish Balay extern PetscErrorCode PetscBagSetFromOptions(PetscBag); 47b29011acSSatish Balay extern PetscErrorCode PetscBagGetName(PetscBag, char **name); 48b29011acSSatish Balay extern PetscErrorCode PetscBagSetName(PetscBag, const char *, const char *); 498cbb96b3SSatish Balay 50b29011acSSatish Balay extern PetscErrorCode PetscBagView(PetscBag,PetscViewer); 51b29011acSSatish Balay extern PetscErrorCode PetscBagLoad(PetscViewer,PetscBag*); 52f588057bSBarry Smith 53b29011acSSatish Balay extern PetscErrorCode PetscBagSetViewer(PetscBag,PetscErrorCode (*)(PetscBag,PetscViewer)); 54b29011acSSatish Balay extern PetscErrorCode PetscBagSetLoader(PetscBag,PetscErrorCode (*)(PetscBag,PetscViewer)); 55b29011acSSatish Balay extern PetscErrorCode PetscBagSetDestroy(PetscBag,PetscErrorCode (*)(PetscBag)); 567c307921SBarry Smith 57e1fa1e0fSSatish Balay PETSC_EXTERN_CXX_END 587c307921SBarry Smith #endif 59