static char help[] =
"...\n\n";
int main(
int argc,
char *argv[]) {
int nb_vertices;
try {
PetscBool flg = PETSC_TRUE;
#if PETSC_VERSION_GE(3, 6, 4)
255, &flg);
#else
#endif
if (flg != PETSC_TRUE)
SETERRQ(PETSC_COMM_SELF, 1, "*** ERROR -my_file (MESH FILE NEEDED)");
{
const char *option;
option = "";
}
CHKERR moab.get_number_entities_by_dimension(0, 0, nb_vertices,
true);
moab.get_entities_by_type(root_set, MBTET, tets, false);
Tag th_vertex_weight;
int def_val = 1;
CHKERR moab.tag_get_handle(
"VERTEX_WEIGHT", 1, MB_TYPE_INTEGER,
th_vertex_weight, MB_TAG_CREAT | MB_TAG_DENSE,
&def_val);
tets, 3, 2, m_field.
get_comm_size(), &th_vertex_weight, NULL, NULL,
CHKERR moab.write_file(
"partitioned_mesh.h5m");
}
}
PetscBarrier(PETSC_NULL);
try {
DMType dm_name = "DMMOFEM";
const char *option = "DEBUG_IO;"
"PARALLEL=READ_PART;"
"PARALLEL_RESOLVE_SHARED_ENTS;"
"PARTITION=PARALLEL_PARTITION;";
"partitioned_mesh.h5m");
"Number of vertices and DOFs is inconstent");
<< "All is good in this test";
}
return 0;
}