8static char help[] =
"...\n\n";
10int main(
int argc,
char *argv[]) {
17 PetscBool in_flg_file = PETSC_FALSE;
18 PetscBool out_flg_file = PETSC_FALSE;
19 CHKERR PetscOptionsBegin(PETSC_COMM_WORLD,
"",
"Fix file options",
"none");
20 CHKERR PetscOptionsString(
"-file_name",
"mesh file name",
"",
"mesh.h5m",
22 CHKERR PetscOptionsString(
"-out_file_name",
"mesh file name",
"",
24 ierr = PetscOptionsEnd();
27 moab::Core mb_instance;
28 moab::Interface &moab = mb_instance;
29 ParallelComm *pcomm = ParallelComm::get_pcomm(&moab,
MYPCOMM_INDEX);
#define CATCH_ERRORS
Catch errors.
#define MYPCOMM_INDEX
default communicator number PCOMM
#define CHKERRG(n)
Check error code of MoFEM/MOAB/PETSc function.
#define CHKERR
Inline error check.
#define MOFEM_LOG(channel, severity)
Log.
static MoFEMErrorCodeGeneric< PetscErrorCode > ierr
implementation of Data Operators for Forces and Sources
static MoFEMErrorCode fixTagSize(moab::Interface &moab, bool *changed=nullptr)
Fix tag size when BITREFLEVEL_SIZE of core library is different than file BITREFLEVEL_SIZE.
static MoFEMErrorCode Initialize(int *argc, char ***args, const char file[], const char help[])
Initializes the MoFEM database PETSc, MOAB and MPI.
static MoFEMErrorCode Finalize()
Checks for options to be called at the conclusion of the program.