45 namespace TriangulationImplementation
54 template <
int dim,
int spacedim>
61 &cell) -> std::uint8_t {
62 if (cell->refine_flag_set())
64 if (cell->coarsen_flag_set())
72 const std::uint8_t &flag) ->
void {
73 cell->clear_coarsen_flag();
74 cell->clear_refine_flag();
76 cell->set_refine_flag();
78 cell->set_coarsen_flag();
81 GridTools::exchange_cell_data_to_ghosts<std::uint8_t>(tria,
92#ifdef DEAL_II_WITH_P4EST
96 template <
int dim,
int spacedim>
98 get_vertex_to_cell_mappings(
100 std::vector<unsigned int> &vertex_touch_count,
101 std::vector<std::list<
103 unsigned int>>> &vertex_to_cell)
108 for (
const auto &cell :
triangulation.active_cell_iterators())
111 ++vertex_touch_count[cell->vertex_index(v)];
112 vertex_to_cell[cell->vertex_index(v)].emplace_back(cell, v);
118 template <
int dim,
int spacedim>
120 get_edge_to_cell_mappings(
122 std::vector<unsigned int> &edge_touch_count,
123 std::vector<std::list<
125 unsigned int>>> &edge_to_cell)
132 for (
const auto &cell :
triangulation.active_cell_iterators())
133 for (unsigned
int l = 0; l < GeometryInfo<dim>::lines_per_cell; ++
l)
135 ++edge_touch_count[cell->line(l)->index()];
136 edge_to_cell[cell->line(l)->index()].emplace_back(cell, l);
146 template <
int dim,
int spacedim>
148 set_vertex_and_cell_info(
150 const std::vector<unsigned int> &vertex_touch_count,
151 const std::vector<std::list<
153 unsigned int>>> &vertex_to_cell,
154 const std::vector<types::global_dof_index>
155 &coarse_cell_to_p4est_tree_permutation,
156 const bool set_vertex_info,
172 if (set_vertex_info ==
true)
173 for (
unsigned int v = 0; v <
triangulation.n_vertices(); ++v)
175 connectivity->vertices[3 * v] =
triangulation.get_vertices()[v][0];
176 connectivity->vertices[3 * v + 1] =
178 connectivity->vertices[3 * v + 2] =
190 for (; cell != endc; ++cell)
192 const unsigned int index =
193 coarse_cell_to_p4est_tree_permutation[cell->index()];
197 if (set_vertex_info ==
true)
200 v] = cell->vertex_index(v);
203 v] = cell->vertex_index(v);
209 if (cell->face(f)->at_boundary() == false)
212 coarse_cell_to_p4est_tree_permutation[cell->neighbor(f)->
index()];
216 coarse_cell_to_p4est_tree_permutation[cell->index()];
221 if (cell->face(f)->at_boundary() == false)
227 connectivity->tree_to_face
229 cell->neighbor_of_neighbor(f);
248 connectivity->tree_to_face[
index * 6 + f] =
249 cell->neighbor_of_neighbor(f);
251 unsigned int face_idx_list[2] = {
252 f, cell->neighbor_of_neighbor(f)};
254 cell_list[2] = {cell, cell->neighbor(f)};
255 unsigned int smaller_idx = 0;
257 if (f > cell->neighbor_of_neighbor(f))
260 unsigned int larger_idx = (smaller_idx + 1) % 2;
268 unsigned int g_idx = cell_list[smaller_idx]->vertex_index(
270 face_idx_list[smaller_idx],
272 cell_list[smaller_idx]->face_orientation(
273 face_idx_list[smaller_idx]),
274 cell_list[smaller_idx]->face_flip(
275 face_idx_list[smaller_idx]),
276 cell_list[smaller_idx]->face_rotation(
277 face_idx_list[smaller_idx])));
281 for (
unsigned int i = 0;
282 i < GeometryInfo<dim>::vertices_per_face;
286 cell_list[larger_idx]->vertex_index(
288 face_idx_list[larger_idx], i));
297 connectivity->tree_to_face[
index * 6 + f] += 6 * v;
311 connectivity->ctt_offset[0] = 0;
312 std::partial_sum(vertex_touch_count.begin(),
313 vertex_touch_count.end(),
314 &connectivity->ctt_offset[1]);
317 num_vtt = std::accumulate(vertex_touch_count.begin(),
318 vertex_touch_count.end(),
323 for (
unsigned int v = 0; v <
triangulation.n_vertices(); ++v)
325 Assert(vertex_to_cell[v].size() == vertex_touch_count[v],
329 std::pair<typename Triangulation<dim, spacedim>::active_cell_iterator,
330 unsigned int>>::const_iterator p =
331 vertex_to_cell[v].begin();
332 for (
unsigned int c = 0; c < vertex_touch_count[v]; ++c, ++p)
334 connectivity->corner_to_tree[connectivity->ctt_offset[v] + c] =
335 coarse_cell_to_p4est_tree_permutation[p->first->index()];
336 connectivity->corner_to_corner[connectivity->ctt_offset[v] + c] =
344 template <
int dim,
int spacedim>
350 Assert(coarse_grid_cell < parallel_forest->connectivity->num_trees,
352 return ((coarse_grid_cell >= parallel_forest->first_local_tree) &&
353 (coarse_grid_cell <= parallel_forest->last_local_tree));
357 template <
int dim,
int spacedim>
359 delete_all_children_and_self(
362 if (cell->has_children())
363 for (
unsigned int c = 0; c < cell->n_children(); ++c)
364 delete_all_children_and_self<dim, spacedim>(cell->child(c));
366 cell->set_coarsen_flag();
371 template <
int dim,
int spacedim>
376 if (cell->has_children())
377 for (
unsigned int c = 0; c < cell->n_children(); ++c)
378 delete_all_children_and_self<dim, spacedim>(cell->child(c));
382 template <
int dim,
int spacedim>
384 determine_level_subdomain_id_recursively(
391 const std::vector<std::vector<bool>> &marked_vertices)
400 if (marked_vertices[dealii_cell->level()]
401 [dealii_cell->vertex_index(v)])
420 if (!used && dealii_cell->is_active() &&
421 dealii_cell->is_artificial() ==
false &&
422 dealii_cell->level() + 1 <
static_cast<int>(marked_vertices.size()))
426 if (marked_vertices[dealii_cell->level() + 1]
427 [dealii_cell->vertex_index(v)])
436 if (!used && dealii_cell->is_active() &&
437 dealii_cell->is_artificial() ==
false && dealii_cell->level() > 0)
441 if (marked_vertices[dealii_cell->level() - 1]
442 [dealii_cell->vertex_index(v)])
453 &forest, tree_index, &p4est_cell, my_subdomain);
454 Assert((owner != -2) && (owner != -1),
456 dealii_cell->set_level_subdomain_id(owner);
460 if (dealii_cell->has_children())
464 for (
unsigned int c = 0; c < GeometryInfo<dim>::max_children_per_cell;
469 P4EST_QUADRANT_INIT(&p4est_child[c]);
472 P8EST_QUADRANT_INIT(&p4est_child[c]);
482 for (
unsigned int c = 0; c < GeometryInfo<dim>::max_children_per_cell;
485 determine_level_subdomain_id_recursively<dim, spacedim>(
488 dealii_cell->child(c),
498 template <
int dim,
int spacedim>
500 match_tree_recursively(
508 if (sc_array_bsearch(
const_cast<sc_array_t *
>(&tree.quadrants),
514 delete_all_children<dim, spacedim>(dealii_cell);
515 if (dealii_cell->is_active())
516 dealii_cell->set_subdomain_id(my_subdomain);
525 if (dealii_cell->is_active())
526 dealii_cell->set_refine_flag();
531 for (
unsigned int c = 0;
532 c < GeometryInfo<dim>::max_children_per_cell;
537 P4EST_QUADRANT_INIT(&p4est_child[c]);
540 P8EST_QUADRANT_INIT(&p4est_child[c]);
550 for (
unsigned int c = 0;
551 c < GeometryInfo<dim>::max_children_per_cell;
556 &p4est_child[c]) ==
false)
562 delete_all_children<dim, spacedim>(dealii_cell->child(c));
563 dealii_cell->child(c)->recursively_set_subdomain_id(
570 match_tree_recursively<dim, spacedim>(tree,
571 dealii_cell->child(c),
581 template <
int dim,
int spacedim>
584 const ::Triangulation<dim, spacedim> *tria,
585 unsigned int dealii_index,
589 const int l = ghost_quadrant.level;
591 for (
int i = 0; i <
l; ++i)
596 if (cell->is_active())
598 cell->clear_coarsen_flag();
599 cell->set_refine_flag();
606 dealii_index = cell->child_index(child_id);
612 if (cell->has_children())
613 delete_all_children<dim, spacedim>(cell);
616 cell->clear_coarsen_flag();
617 cell->set_subdomain_id(ghost_owner);
622 class PartitionSearch
630 PartitionSearch(
const PartitionSearch<dim> &other) =
delete;
632 PartitionSearch<dim> &
633 operator=(
const PartitionSearch<dim> &other) =
delete;
689 quad_length_on_level);
692 initialize_mapping();
695 map_real_to_unit_cell(
const Point<dim> &p)
const;
698 is_in_this_quadrant(
const Point<dim> &p)
const;
701 std::vector<Point<dim>> cell_vertices;
709 bool are_vertices_initialized;
711 bool is_reference_mapping_initialized;
717 QuadrantData quadrant_data;
724 PartitionSearch<dim>::local_quadrant_fn(
737 PartitionSearch<dim> *this_object =
738 reinterpret_cast<PartitionSearch<dim> *
>(forest->user_pointer);
742 quad_length_on_level =
744 (dim == 2 ? P4EST_MAXLEVEL : P8EST_MAXLEVEL)) -
748 this_object->quadrant_data.set_cell_vertices(forest,
751 quad_length_on_level);
754 this_object->quadrant_data.initialize_mapping();
764 PartitionSearch<dim>::local_point_fn(
777 PartitionSearch<dim> *this_object =
778 reinterpret_cast<PartitionSearch<dim> *
>(forest->user_pointer);
781 double *this_point_dptr =
static_cast<double *
>(
point);
784 (dim == 2 ?
Point<dim>(this_point_dptr[0], this_point_dptr[1]) :
785 Point<dim>(this_point_dptr[0],
787 this_point_dptr[2]));
790 const bool is_in_this_quadrant =
791 this_object->quadrant_data.is_in_this_quadrant(this_point);
795 if (!is_in_this_quadrant)
804 if (rank_begin < rank_end)
812 this_point_dptr[dim] =
static_cast<double>(rank_begin);
822 PartitionSearch<dim>::QuadrantData::is_in_this_quadrant(
825 const Point<dim> p_ref = map_real_to_unit_cell(p);
834 PartitionSearch<dim>::QuadrantData::map_real_to_unit_cell(
837 Assert(is_reference_mapping_initialized,
839 "Cell vertices and mapping coefficients must be fully "
840 "initialized before transforming a point to the unit cell."));
846 for (
unsigned int alpha = 0;
847 alpha < GeometryInfo<dim>::vertices_per_cell;
853 p_out += (quadrant_mapping_matrix(alpha, 0) +
854 quadrant_mapping_matrix(alpha, 1) * p(0) +
855 quadrant_mapping_matrix(alpha, 2) * p(1) +
856 quadrant_mapping_matrix(alpha, 3) * p(0) * p(1)) *
862 for (
unsigned int alpha = 0;
863 alpha < GeometryInfo<dim>::vertices_per_cell;
869 p_out += (quadrant_mapping_matrix(alpha, 0) +
870 quadrant_mapping_matrix(alpha, 1) * p(0) +
871 quadrant_mapping_matrix(alpha, 2) * p(1) +
872 quadrant_mapping_matrix(alpha, 3) * p(2) +
873 quadrant_mapping_matrix(alpha, 4) * p(0) * p(1) +
874 quadrant_mapping_matrix(alpha, 5) * p(1) * p(2) +
875 quadrant_mapping_matrix(alpha, 6) * p(0) * p(2) +
876 quadrant_mapping_matrix(alpha, 7) * p(0) * p(1) * p(2)) *
886 PartitionSearch<dim>::QuadrantData::QuadrantData()
888 , quadrant_mapping_matrix(
GeometryInfo<dim>::vertices_per_cell,
890 , are_vertices_initialized(false)
891 , is_reference_mapping_initialized(false)
898 PartitionSearch<dim>::QuadrantData::initialize_mapping()
901 are_vertices_initialized,
903 "Cell vertices must be initialized before the cell mapping can be filled."));
910 for (
unsigned int alpha = 0;
911 alpha < GeometryInfo<dim>::vertices_per_cell;
915 point_matrix(0, alpha) = 1;
916 point_matrix(1, alpha) = cell_vertices[alpha](0);
917 point_matrix(2, alpha) = cell_vertices[alpha](1);
918 point_matrix(3, alpha) =
919 cell_vertices[alpha](0) * cell_vertices[alpha](1);
926 quadrant_mapping_matrix.invert(point_matrix);
930 for (
unsigned int alpha = 0;
931 alpha < GeometryInfo<dim>::vertices_per_cell;
935 point_matrix(0, alpha) = 1;
936 point_matrix(1, alpha) = cell_vertices[alpha](0);
937 point_matrix(2, alpha) = cell_vertices[alpha](1);
938 point_matrix(3, alpha) = cell_vertices[alpha](2);
939 point_matrix(4, alpha) =
940 cell_vertices[alpha](0) * cell_vertices[alpha](1);
941 point_matrix(5, alpha) =
942 cell_vertices[alpha](1) * cell_vertices[alpha](2);
943 point_matrix(6, alpha) =
944 cell_vertices[alpha](0) * cell_vertices[alpha](2);
945 point_matrix(7, alpha) = cell_vertices[alpha](0) *
946 cell_vertices[alpha](1) *
947 cell_vertices[alpha](2);
954 quadrant_mapping_matrix.invert(point_matrix);
957 is_reference_mapping_initialized =
true;
964 PartitionSearch<2>::QuadrantData::set_cell_vertices(
969 quad_length_on_level)
971 constexpr unsigned int dim = 2;
975 double corner_point[dim + 1] = {0};
978 const auto copy_vertex = [&](
unsigned int vertex_index) ->
void {
980 for (
unsigned int d = 0;
d < dim; ++
d)
982 cell_vertices[vertex_index](
d) = corner_point[d];
992 unsigned int vertex_index = 0;
994 forest->connectivity, which_tree, quadrant->x, quadrant->y, corner_point);
997 copy_vertex(vertex_index);
1004 forest->connectivity,
1006 quadrant->x + quad_length_on_level,
1011 copy_vertex(vertex_index);
1018 forest->connectivity,
1021 quadrant->y + quad_length_on_level,
1025 copy_vertex(vertex_index);
1032 forest->connectivity,
1034 quadrant->x + quad_length_on_level,
1035 quadrant->y + quad_length_on_level,
1039 copy_vertex(vertex_index);
1041 are_vertices_initialized =
true;
1048 PartitionSearch<3>::QuadrantData::set_cell_vertices(
1053 quad_length_on_level)
1055 constexpr unsigned int dim = 3;
1057 double corner_point[dim] = {0};
1060 auto copy_vertex = [&](
unsigned int vertex_index) ->
void {
1062 for (
unsigned int d = 0;
d < dim; ++
d)
1064 cell_vertices[vertex_index](
d) = corner_point[d];
1066 corner_point[
d] = 0;
1074 unsigned int vertex_index = 0;
1076 forest->connectivity,
1084 copy_vertex(vertex_index);
1092 forest->connectivity,
1094 quadrant->x + quad_length_on_level,
1100 copy_vertex(vertex_index);
1107 forest->connectivity,
1110 quadrant->y + quad_length_on_level,
1115 copy_vertex(vertex_index);
1122 forest->connectivity,
1124 quadrant->x + quad_length_on_level,
1125 quadrant->y + quad_length_on_level,
1130 copy_vertex(vertex_index);
1137 forest->connectivity,
1141 quadrant->z + quad_length_on_level,
1145 copy_vertex(vertex_index);
1152 forest->connectivity,
1154 quadrant->x + quad_length_on_level,
1156 quadrant->z + quad_length_on_level,
1160 copy_vertex(vertex_index);
1167 forest->connectivity,
1170 quadrant->y + quad_length_on_level,
1171 quadrant->z + quad_length_on_level,
1175 copy_vertex(vertex_index);
1182 forest->connectivity,
1184 quadrant->x + quad_length_on_level,
1185 quadrant->y + quad_length_on_level,
1186 quadrant->z + quad_length_on_level,
1190 copy_vertex(vertex_index);
1193 are_vertices_initialized =
true;
1203 template <
int dim,
int spacedim>
1204 class RefineAndCoarsenList
1208 const std::vector<types::global_dof_index>
1209 &p4est_tree_to_coarse_cell_permutation,
1237 pointers_are_at_end()
const;
1240 std::vector<typename internal::p4est::types<dim>::quadrant> refine_list;
1241 typename std::vector<typename internal::p4est::types<dim>::quadrant>::
1242 const_iterator current_refine_pointer;
1244 std::vector<typename internal::p4est::types<dim>::quadrant> coarsen_list;
1245 typename std::vector<typename internal::p4est::types<dim>::quadrant>::
1246 const_iterator current_coarsen_pointer;
1257 template <
int dim,
int spacedim>
1259 RefineAndCoarsenList<dim, spacedim>::pointers_are_at_end()
const
1261 return ((current_refine_pointer == refine_list.end()) &&
1262 (current_coarsen_pointer == coarsen_list.end()));
1267 template <
int dim,
int spacedim>
1268 RefineAndCoarsenList<dim, spacedim>::RefineAndCoarsenList(
1270 const std::vector<types::global_dof_index>
1271 &p4est_tree_to_coarse_cell_permutation,
1275 unsigned int n_refine_flags = 0, n_coarsen_flags = 0;
1276 for (
const auto &cell :
triangulation.active_cell_iterators())
1279 if (cell->subdomain_id() != my_subdomain)
1282 if (cell->refine_flag_set())
1284 else if (cell->coarsen_flag_set())
1288 refine_list.reserve(n_refine_flags);
1289 coarsen_list.reserve(n_coarsen_flags);
1301 unsigned int coarse_cell_index =
1302 p4est_tree_to_coarse_cell_permutation[c];
1311 p4est_cell.p.which_tree = c;
1312 build_lists(cell, p4est_cell, my_subdomain);
1320 for (
unsigned int i = 1; i < refine_list.size(); ++i)
1321 Assert(refine_list[i].p.which_tree >= refine_list[i - 1].p.which_tree,
1323 for (
unsigned int i = 1; i < coarsen_list.size(); ++i)
1324 Assert(coarsen_list[i].p.which_tree >= coarsen_list[i - 1].p.which_tree,
1327 current_refine_pointer = refine_list.begin();
1328 current_coarsen_pointer = coarsen_list.begin();
1333 template <
int dim,
int spacedim>
1335 RefineAndCoarsenList<dim, spacedim>::build_lists(
1340 if (cell->is_active())
1342 if (cell->subdomain_id() == my_subdomain)
1344 if (cell->refine_flag_set())
1345 refine_list.push_back(p4est_cell);
1346 else if (cell->coarsen_flag_set())
1347 coarsen_list.push_back(p4est_cell);
1354 for (
unsigned int c = 0; c < GeometryInfo<dim>::max_children_per_cell;
1359 P4EST_QUADRANT_INIT(&p4est_child[c]);
1362 P8EST_QUADRANT_INIT(&p4est_child[c]);
1369 for (
unsigned int c = 0; c < GeometryInfo<dim>::max_children_per_cell;
1372 p4est_child[c].p.which_tree = p4est_cell.p.which_tree;
1373 build_lists(cell->child(c), p4est_child[c], my_subdomain);
1379 template <
int dim,
int spacedim>
1381 RefineAndCoarsenList<dim, spacedim>::refine_callback(
1386 RefineAndCoarsenList<dim, spacedim> *this_object =
1387 reinterpret_cast<RefineAndCoarsenList<dim, spacedim> *
>(
1388 forest->user_pointer);
1392 if (this_object->current_refine_pointer == this_object->refine_list.end())
1395 Assert(coarse_cell_index <=
1396 this_object->current_refine_pointer->p.which_tree,
1401 if (coarse_cell_index < this_object->current_refine_pointer->p.which_tree)
1405 Assert(coarse_cell_index <=
1406 this_object->current_refine_pointer->p.which_tree,
1412 quadrant, &*this_object->current_refine_pointer) <= 0,
1417 quadrant, &*this_object->current_refine_pointer))
1419 ++this_object->current_refine_pointer;
1429 template <
int dim,
int spacedim>
1431 RefineAndCoarsenList<dim, spacedim>::coarsen_callback(
1436 RefineAndCoarsenList<dim, spacedim> *this_object =
1437 reinterpret_cast<RefineAndCoarsenList<dim, spacedim> *
>(
1438 forest->user_pointer);
1442 if (this_object->current_coarsen_pointer == this_object->coarsen_list.end())
1445 Assert(coarse_cell_index <=
1446 this_object->current_coarsen_pointer->p.which_tree,
1451 if (coarse_cell_index < this_object->current_coarsen_pointer->p.which_tree)
1455 Assert(coarse_cell_index <=
1456 this_object->current_coarsen_pointer->p.which_tree,
1462 children[0], &*this_object->current_coarsen_pointer) <= 0,
1468 children[0], &*this_object->current_coarsen_pointer))
1471 ++this_object->current_coarsen_pointer;
1475 for (
unsigned int c = 1; c < GeometryInfo<dim>::max_children_per_cell;
1479 children[c], &*this_object->current_coarsen_pointer),
1481 ++this_object->current_coarsen_pointer;
1499 template <
int dim,
int spacedim>
1500 class PartitionWeights
1508 explicit PartitionWeights(
const std::vector<unsigned int> &cell_weights);
1523 std::vector<unsigned int> cell_weights_list;
1524 std::vector<unsigned int>::const_iterator current_pointer;
1528 template <
int dim,
int spacedim>
1529 PartitionWeights<dim, spacedim>::PartitionWeights(
1530 const std::vector<unsigned int> &cell_weights)
1531 : cell_weights_list(cell_weights)
1535 current_pointer = cell_weights_list.begin();
1539 template <
int dim,
int spacedim>
1541 PartitionWeights<dim, spacedim>::cell_weight(
1550 PartitionWeights<dim, spacedim> *this_object =
1551 reinterpret_cast<PartitionWeights<dim, spacedim> *
>(forest->user_pointer);
1553 Assert(this_object->current_pointer >=
1554 this_object->cell_weights_list.begin(),
1556 Assert(this_object->current_pointer < this_object->cell_weights_list.end(),
1562 const unsigned int weight = *this_object->current_pointer;
1563 ++this_object->current_pointer;
1565 Assert(weight <
static_cast<unsigned int>(std::numeric_limits<int>::max()),
1566 ExcMessage(
"p4est uses 'signed int' to represent the partition "
1567 "weights for cells. The weight provided here exceeds "
1568 "the maximum value represented as a 'signed int'."));
1569 return static_cast<int>(weight);
1572 template <
int dim,
int spacedim>
1573 using cell_relation_t =
typename std::pair<
1574 typename ::Triangulation<dim, spacedim>::cell_iterator,
1586 template <
int dim,
int spacedim>
1588 add_single_cell_relation(
1589 std::vector<cell_relation_t<dim, spacedim>> &cell_rel,
1590 const typename ::internal::p4est::types<dim>::tree &tree,
1591 const unsigned int idx,
1595 const unsigned int local_quadrant_index = tree.quadrants_offset + idx;
1601 cell_rel[local_quadrant_index] = std::make_pair(dealii_cell, status);
1615 template <
int dim,
int spacedim>
1617 update_cell_relations_recursively(
1618 std::vector<cell_relation_t<dim, spacedim>> &cell_rel,
1619 const typename ::internal::p4est::types<dim>::tree &tree,
1621 const typename ::internal::p4est::types<dim>::quadrant &p4est_cell)
1624 const int idx = sc_array_bsearch(
1625 const_cast<sc_array_t *
>(&tree.quadrants),
1630 const_cast<typename ::internal::p4est::types<dim>::tree *
>(
1632 &p4est_cell) ==
false))
1637 const bool p4est_has_children = (idx == -1);
1638 if (p4est_has_children && dealii_cell->has_children())
1641 typename ::internal::p4est::types<dim>::quadrant
1644 for (
unsigned int c = 0; c < GeometryInfo<dim>::max_children_per_cell;
1649 P4EST_QUADRANT_INIT(&p4est_child[c]);
1652 P8EST_QUADRANT_INIT(&p4est_child[c]);
1659 &p4est_cell, p4est_child);
1661 for (
unsigned int c = 0; c < GeometryInfo<dim>::max_children_per_cell;
1664 update_cell_relations_recursively<dim, spacedim>(
1665 cell_rel, tree, dealii_cell->child(c), p4est_child[c]);
1668 else if (!p4est_has_children && !dealii_cell->has_children())
1672 add_single_cell_relation<dim, spacedim>(
1675 else if (p4est_has_children)
1683 typename ::internal::p4est::types<dim>::quadrant
1685 for (
unsigned int c = 0; c < GeometryInfo<dim>::max_children_per_cell;
1690 P4EST_QUADRANT_INIT(&p4est_child[c]);
1693 P8EST_QUADRANT_INIT(&p4est_child[c]);
1700 &p4est_cell, p4est_child);
1708 for (
unsigned int i = 0; i < GeometryInfo<dim>::max_children_per_cell;
1711 child_idx = sc_array_bsearch(
1712 const_cast<sc_array_t *
>(&tree.quadrants),
1719 add_single_cell_relation<dim, spacedim>(
1720 cell_rel, tree, child_idx, dealii_cell, cell_status);
1728 add_single_cell_relation<dim, spacedim>(
1742 namespace distributed
1745 template <
int dim,
int spacedim>
1757 (settings & construct_multigrid_hierarchy) ?
1761 Triangulation<dim, spacedim>::limit_level_difference_at_vertices) :
1764 , settings(settings)
1765 , triangulation_has_content(false)
1766 , connectivity(
nullptr)
1767 , parallel_forest(
nullptr)
1769 parallel_ghost =
nullptr;
1774 template <
int dim,
int spacedim>
1795 template <
int dim,
int spacedim>
1808 const typename ::Triangulation<dim, spacedim>::DistortedCellList
1817 this->all_reference_cells_are_hyper_cube(),
1819 "The class parallel::distributed::Triangulation only supports meshes "
1820 "consisting only of hypercube-like cells."));
1825 triangulation_has_content =
true;
1827 setup_coarse_cell_to_p4est_tree_permutation();
1829 copy_new_triangulation_to_p4est(std::integral_constant<int, dim>());
1833 copy_local_forest_to_triangulation();
1842 this->update_periodic_face_map();
1843 this->update_number_cache();
1848 template <
int dim,
int spacedim>
1859 template <
int dim,
int spacedim>
1863 triangulation_has_content =
false;
1865 if (parallel_ghost !=
nullptr)
1869 parallel_ghost =
nullptr;
1872 if (parallel_forest !=
nullptr)
1875 parallel_forest =
nullptr;
1878 if (connectivity !=
nullptr)
1882 connectivity =
nullptr;
1885 coarse_cell_to_p4est_tree_permutation.resize(0);
1886 p4est_tree_to_coarse_cell_permutation.resize(0);
1890 this->update_number_cache();
1895 template <
int dim,
int spacedim>
1906 template <
int dim,
int spacedim>
1917 template <
int dim,
int spacedim>
1923 *previous_global_first_quadrant)
1925 Assert(this->data_serializer.sizes_fixed_cumulative.size() > 0,
1929 this->data_serializer.dest_data_fixed.resize(
1930 parallel_forest->local_num_quadrants *
1931 this->data_serializer.sizes_fixed_cumulative.back());
1934 typename ::internal::p4est::types<dim>::transfer_context
1938 parallel_forest->global_first_quadrant,
1939 previous_global_first_quadrant,
1940 parallel_forest->mpicomm,
1942 this->data_serializer.dest_data_fixed.data(),
1943 this->data_serializer.src_data_fixed.data(),
1944 this->data_serializer.sizes_fixed_cumulative.back());
1946 if (this->data_serializer.variable_size_data_stored)
1949 this->data_serializer.dest_sizes_variable.resize(
1950 parallel_forest->local_num_quadrants);
1955 parallel_forest->global_first_quadrant,
1956 previous_global_first_quadrant,
1957 parallel_forest->mpicomm,
1959 this->data_serializer.dest_sizes_variable.data(),
1960 this->data_serializer.src_sizes_variable.data(),
1961 sizeof(
unsigned int));
1967 this->data_serializer.src_data_fixed.clear();
1968 this->data_serializer.src_data_fixed.shrink_to_fit();
1970 if (this->data_serializer.variable_size_data_stored)
1973 this->data_serializer.dest_data_variable.resize(
1974 std::accumulate(this->data_serializer.dest_sizes_variable.begin(),
1975 this->data_serializer.dest_sizes_variable.end(),
1976 std::vector<int>::size_type(0)));
1980 parallel_forest->global_first_quadrant,
1981 previous_global_first_quadrant,
1982 parallel_forest->mpicomm,
1984 this->data_serializer.dest_data_variable.data(),
1985 this->data_serializer.dest_sizes_variable.data(),
1986 this->data_serializer.src_data_variable.data(),
1987 this->data_serializer.src_sizes_variable.data());
1990 this->data_serializer.src_sizes_variable.clear();
1991 this->data_serializer.src_sizes_variable.shrink_to_fit();
1992 this->data_serializer.src_data_variable.clear();
1993 this->data_serializer.src_data_variable.shrink_to_fit();
1999 template <
int dim,
int spacedim>
2002 spacedim>::setup_coarse_cell_to_p4est_tree_permutation()
2007 coarse_cell_to_p4est_tree_permutation.resize(this->n_cells(0));
2009 cell_connectivity, coarse_cell_to_p4est_tree_permutation);
2011 p4est_tree_to_coarse_cell_permutation =
2017 template <
int dim,
int spacedim>
2020 const
std::
string &file_basename)
const
2022 Assert(parallel_forest !=
nullptr,
2023 ExcMessage(
"Can't produce output when no forest is created yet."));
2027 "To use this function the triangulation's flag "
2028 "Settings::communicate_vertices_to_p4est must be set."));
2031 parallel_forest,
nullptr, file_basename.c_str());
2036 template <
int dim,
int spacedim>
2039 const
std::
string &file_basename)
const
2042 this->cell_attached_data.n_attached_deserialize == 0,
2044 "Not all SolutionTransfer objects have been deserialized after the last call to load()."));
2045 Assert(this->n_cells() > 0,
2046 ExcMessage(
"Can not save() an empty Triangulation."));
2052 this->signals.pre_distributed_save();
2054 if (this->my_subdomain == 0)
2056 std::string fname = file_basename +
".info";
2057 std::ofstream f(fname);
2058 f <<
"version nproc n_attached_fixed_size_objs n_attached_variable_size_objs n_coarse_cells"
2062 << this->cell_attached_data.pack_callbacks_fixed.size() <<
" "
2063 << this->cell_attached_data.pack_callbacks_variable.size() <<
" "
2064 << this->n_cells(0) << std::endl;
2068 for ([[maybe_unused]]
const auto &cell_rel : this->local_cell_relations)
2070 Assert((cell_rel.second ==
2076 this->save_attached_data(parallel_forest->global_first_quadrant[myrank],
2077 parallel_forest->global_num_quadrants,
2085 this->signals.post_distributed_save();
2090 template <
int dim,
int spacedim>
2095 this->n_cells() > 0,
2097 "load() only works if the Triangulation already contains a coarse mesh!"));
2099 this->n_levels() == 1,
2101 "Triangulation may only contain coarse cells when calling load()."));
2107 this->signals.pre_distributed_load();
2109 if (parallel_ghost !=
nullptr)
2113 parallel_ghost =
nullptr;
2116 parallel_forest =
nullptr;
2119 connectivity =
nullptr;
2121 unsigned int version, numcpus, attached_count_fixed,
2122 attached_count_variable, n_coarse_cells;
2124 std::string fname = std::string(file_basename) +
".info";
2125 std::ifstream f(fname);
2127 std::string firstline;
2128 getline(f, firstline);
2129 f >> version >> numcpus >> attached_count_fixed >>
2130 attached_count_variable >> n_coarse_cells;
2134 ExcMessage(
"Incompatible version found in .info file."));
2135 Assert(this->n_cells(0) == n_coarse_cells,
2136 ExcMessage(
"Number of coarse cells differ!"));
2140 this->cell_attached_data.n_attached_data_sets = 0;
2141 this->cell_attached_data.n_attached_deserialize =
2142 attached_count_fixed + attached_count_variable;
2145 file_basename.c_str(),
2146 this->mpi_communicator,
2164 copy_local_forest_to_triangulation();
2174 this->load_attached_data(parallel_forest->global_first_quadrant[myrank],
2175 parallel_forest->global_num_quadrants,
2176 parallel_forest->local_num_quadrants,
2178 attached_count_fixed,
2179 attached_count_variable);
2182 this->signals.post_distributed_load();
2184 this->update_periodic_face_map();
2185 this->update_number_cache();
2190 template <
int dim,
int spacedim>
2193 const typename ::
internal::p4est::
types<dim>::forest *forest)
2195 Assert(this->n_cells() > 0,
2197 "load() only works if the Triangulation already contains "
2199 Assert(this->n_cells() == forest->trees->elem_count,
2201 "Coarse mesh of the Triangulation does not match the one "
2202 "of the provided forest!"));
2205 if (parallel_ghost !=
nullptr)
2209 parallel_ghost =
nullptr;
2212 parallel_forest =
nullptr;
2218 typename ::internal::p4est::types<dim>::forest *temp =
2219 const_cast<typename ::internal::p4est::types<dim>::forest *
>(
2223 parallel_forest->connectivity = connectivity;
2224 parallel_forest->user_pointer =
this;
2228 copy_local_forest_to_triangulation();
2237 this->update_periodic_face_map();
2238 this->update_number_cache();
2243 template <
int dim,
int spacedim>
2247 Assert(parallel_forest !=
nullptr,
2249 "Can't produce a check sum when no forest is created yet."));
2254# if !DEAL_II_P4EST_VERSION_GTE(2, 8, 6, 0)
2270 template <
int dim,
int spacedim>
2272 const typename ::internal::p4est::types<dim>::forest
2275 Assert(parallel_forest !=
nullptr,
2276 ExcMessage(
"The forest has not been allocated yet."));
2277 return parallel_forest;
2282 template <
int dim,
int spacedim>
2284 typename ::internal::p4est::types<dim>::tree
2286 const int dealii_coarse_cell_index)
const
2288 const unsigned int tree_index =
2289 coarse_cell_to_p4est_tree_permutation[dealii_coarse_cell_index];
2290 typename ::internal::p4est::types<dim>::tree *tree =
2291 static_cast<typename ::internal::p4est::types<dim>::tree *
>(
2292 sc_array_index(parallel_forest->trees, tree_index));
2306 std::integral_constant<int, 2>)
2308 const unsigned int dim = 2, spacedim = 2;
2316 std::vector<unsigned int> vertex_touch_count;
2318 std::list<std::pair<Triangulation<dim, spacedim>::active_cell_iterator,
2321 get_vertex_to_cell_mappings(*
this, vertex_touch_count, vertex_to_cell);
2322 const ::internal::p4est::types<2>::locidx num_vtt =
2323 std::accumulate(vertex_touch_count.begin(),
2324 vertex_touch_count.end(),
2330 const bool set_vertex_info = this->are_vertices_communicated_to_p4est();
2333 (set_vertex_info ==
true ? this->n_vertices() : 0),
2338 set_vertex_and_cell_info(*
this,
2341 coarse_cell_to_p4est_tree_permutation,
2345 Assert(p4est_connectivity_is_valid(connectivity) == 1,
2350 this->mpi_communicator,
2367 std::integral_constant<int, 2>)
2369 const unsigned int dim = 2, spacedim = 3;
2377 std::vector<unsigned int> vertex_touch_count;
2379 std::list<std::pair<Triangulation<dim, spacedim>::active_cell_iterator,
2382 get_vertex_to_cell_mappings(*
this, vertex_touch_count, vertex_to_cell);
2383 const ::internal::p4est::types<2>::locidx num_vtt =
2384 std::accumulate(vertex_touch_count.begin(),
2385 vertex_touch_count.end(),
2391 const bool set_vertex_info = this->are_vertices_communicated_to_p4est();
2394 (set_vertex_info ==
true ? this->n_vertices() : 0),
2399 set_vertex_and_cell_info(*
this,
2402 coarse_cell_to_p4est_tree_permutation,
2406 Assert(p4est_connectivity_is_valid(connectivity) == 1,
2411 this->mpi_communicator,
2426 std::integral_constant<int, 3>)
2428 const int dim = 3, spacedim = 3;
2436 std::vector<unsigned int> vertex_touch_count;
2437 std::vector<std::list<
2438 std::pair<Triangulation<3>::active_cell_iterator,
unsigned int>>>
2440 get_vertex_to_cell_mappings(*
this, vertex_touch_count, vertex_to_cell);
2441 const ::internal::p4est::types<2>::locidx num_vtt =
2442 std::accumulate(vertex_touch_count.begin(),
2443 vertex_touch_count.end(),
2446 std::vector<unsigned int> edge_touch_count;
2447 std::vector<std::list<
2448 std::pair<Triangulation<3>::active_cell_iterator,
unsigned int>>>
2450 get_edge_to_cell_mappings(*
this, edge_touch_count, edge_to_cell);
2451 const ::internal::p4est::types<2>::locidx num_ett =
2452 std::accumulate(edge_touch_count.begin(), edge_touch_count.end(), 0u);
2455 const bool set_vertex_info = this->are_vertices_communicated_to_p4est();
2458 (set_vertex_info ==
true ? this->n_vertices() : 0),
2460 this->n_active_lines(),
2465 set_vertex_and_cell_info(*
this,
2468 coarse_cell_to_p4est_tree_permutation,
2497 const unsigned int deal_to_p4est_line_index[12] = {
2498 4, 5, 0, 1, 6, 7, 2, 3, 8, 9, 10, 11};
2501 this->begin_active();
2502 cell != this->
end();
2505 const unsigned int index =
2506 coarse_cell_to_p4est_tree_permutation[cell->index()];
2507 for (
unsigned int e = 0; e < GeometryInfo<3>::lines_per_cell; ++
e)
2509 deal_to_p4est_line_index[e]] =
2510 cell->line(e)->index();
2515 connectivity->ett_offset[0] = 0;
2516 std::partial_sum(edge_touch_count.begin(),
2517 edge_touch_count.end(),
2518 &connectivity->ett_offset[1]);
2520 Assert(connectivity->ett_offset[this->n_active_lines()] == num_ett,
2523 for (
unsigned int v = 0; v < this->n_active_lines(); ++v)
2525 Assert(edge_to_cell[v].size() == edge_touch_count[v],
2529 std::pair<Triangulation<dim, spacedim>::active_cell_iterator,
2530 unsigned int>>::const_iterator p =
2531 edge_to_cell[v].begin();
2532 for (
unsigned int c = 0; c < edge_touch_count[v]; ++c, ++p)
2534 connectivity->edge_to_tree[connectivity->ett_offset[v] + c] =
2535 coarse_cell_to_p4est_tree_permutation[p->first->index()];
2536 connectivity->edge_to_edge[connectivity->ett_offset[v] + c] =
2537 deal_to_p4est_line_index[p->second];
2541 Assert(p8est_connectivity_is_valid(connectivity) == 1,
2546 this->mpi_communicator,
2563 template <
int dim,
int spacedim>
2565 enforce_mesh_balance_over_periodic_boundaries(
2571 std::vector<bool> flags_before[2];
2575 std::vector<unsigned int> topological_vertex_numbering(
2577 for (
unsigned int i = 0; i < topological_vertex_numbering.size(); ++i)
2578 topological_vertex_numbering[i] = i;
2596 using cell_iterator =
2598 for (
const auto &it : tria.get_periodic_face_map())
2600 const cell_iterator &cell_1 = it.first.first;
2601 const unsigned int face_no_1 = it.first.second;
2602 const cell_iterator &cell_2 = it.second.first.first;
2603 const unsigned int face_no_2 = it.second.first.second;
2604 const unsigned char combined_orientation = it.second.second;
2606 if (cell_1->level() == cell_2->level())
2608 for (
const unsigned int v :
2613 const unsigned int vface1 =
2614 cell_1->reference_cell().standard_to_real_face_vertex(
2615 v, face_no_1, combined_orientation);
2616 const unsigned int vi1 =
2617 topological_vertex_numbering[cell_1->face(face_no_1)
2618 ->vertex_index(vface1)];
2619 const unsigned int vi2 =
2620 topological_vertex_numbering[cell_2->face(face_no_2)
2622 const unsigned int min_index =
std::min(vi1, vi2);
2623 topological_vertex_numbering[cell_1->face(face_no_1)
2624 ->vertex_index(vface1)] =
2625 topological_vertex_numbering[cell_2->face(face_no_2)
2626 ->vertex_index(v)] =
2634 for (
unsigned int i = 0; i < topological_vertex_numbering.size(); ++i)
2636 const unsigned int j = topological_vertex_numbering[i];
2637 Assert(j == i || topological_vertex_numbering[j] == j,
2638 ExcMessage(
"Got inconclusive constraints with chain: " +
2639 std::to_string(i) +
" vs " + std::to_string(j) +
2640 " which should be equal to " +
2641 std::to_string(topological_vertex_numbering[j])));
2648 bool continue_iterating =
true;
2649 std::vector<int> vertex_level(tria.
n_vertices());
2650 while (continue_iterating)
2654 std::fill(vertex_level.begin(), vertex_level.end(), 0);
2658 for (; cell != endc; ++cell)
2660 if (cell->refine_flag_set())
2661 for (
const unsigned int vertex :
2663 vertex_level[topological_vertex_numbering
2664 [cell->vertex_index(vertex)]] =
2665 std::
max(vertex_level[topological_vertex_numbering
2666 [cell->vertex_index(vertex)]],
2668 else if (!cell->coarsen_flag_set())
2669 for (
const unsigned int vertex :
2671 vertex_level[topological_vertex_numbering
2672 [cell->vertex_index(vertex)]] =
2673 std::
max(vertex_level[topological_vertex_numbering
2674 [cell->vertex_index(vertex)]],
2685 for (
const unsigned int vertex :
2687 vertex_level[topological_vertex_numbering
2688 [cell->vertex_index(vertex)]] =
2689 std::
max(vertex_level[topological_vertex_numbering
2690 [cell->vertex_index(vertex)]],
2695 continue_iterating =
false;
2706 for (cell = tria.
last_active(); cell != endc; --cell)
2707 if (cell->refine_flag_set() ==
false)
2709 for (
const unsigned int vertex :
2711 if (vertex_level[topological_vertex_numbering
2712 [cell->vertex_index(vertex)]] >=
2716 cell->clear_coarsen_flag();
2721 if (vertex_level[topological_vertex_numbering
2722 [cell->vertex_index(vertex)]] >
2725 cell->set_refine_flag();
2726 continue_iterating =
true;
2728 for (
const unsigned int v :
2730 vertex_level[topological_vertex_numbering
2731 [cell->vertex_index(v)]] =
2733 vertex_level[topological_vertex_numbering
2734 [cell->vertex_index(v)]],
2745 for (
const auto &cell : tria.cell_iterators())
2748 if (cell->is_active())
2751 const unsigned int n_children = cell->n_children();
2752 unsigned int flagged_children = 0;
2753 for (
unsigned int child = 0; child < n_children; ++child)
2754 if (cell->child(child)->is_active() &&
2755 cell->child(child)->coarsen_flag_set())
2760 if (flagged_children < n_children)
2761 for (
unsigned int child = 0; child < n_children; ++child)
2762 if (cell->child(child)->is_active())
2763 cell->child(child)->clear_coarsen_flag();
2766 std::vector<bool> flags_after[2];
2769 return ((flags_before[0] != flags_after[0]) ||
2770 (flags_before[1] != flags_after[1]));
2776 template <
int dim,
int spacedim>
2795 template <
int dim,
int spacedim>
2816 if (settings & construct_multigrid_hierarchy)
2819 spacedim>::limit_level_difference_at_vertices;
2823 bool mesh_changed =
false;
2831 if (settings & mesh_reconstruction_after_repartitioning)
2832 while (this->n_levels() > 1)
2839 for (
const auto &cell :
2840 this->active_cell_iterators_on_level(this->n_levels() - 1))
2842 cell->set_coarsen_flag();
2860 if (parallel_ghost !=
nullptr)
2864 parallel_ghost =
nullptr;
2868 (dim == 2 ? typename ::internal::p4est::types<dim>::balance_type(
2869 P4EST_CONNECT_CORNER) :
2870 typename ::internal::p4est::types<dim>::balance_type(
2871 P8EST_CONNECT_CORNER)));
2878 for (
const auto &cell : this->cell_iterators_on_level(0))
2883 for (
const auto &cell : this->cell_iterators_on_level(0))
2888 if (tree_exists_locally<dim, spacedim>(
2890 coarse_cell_to_p4est_tree_permutation[cell->index()]) ==
2893 delete_all_children<dim, spacedim>(cell);
2894 if (cell->is_active())
2903 typename ::internal::p4est::types<dim>::quadrant
2905 typename ::internal::p4est::types<dim>::tree *tree =
2906 init_tree(cell->index());
2908 ::internal::p4est::init_coarse_quadrant<dim>(
2911 match_tree_recursively<dim, spacedim>(*tree,
2915 this->my_subdomain);
2922 typename ::internal::p4est::types<dim>::quadrant *quadr;
2924 typename ::internal::p4est::types<dim>::topidx ghost_tree = 0;
2926 for (
unsigned int g_idx = 0;
2927 g_idx < parallel_ghost->ghosts.elem_count;
2930 while (g_idx >=
static_cast<unsigned int>(
2931 parallel_ghost->proc_offsets[ghost_owner + 1]))
2933 while (g_idx >=
static_cast<unsigned int>(
2934 parallel_ghost->tree_offsets[ghost_tree + 1]))
2937 quadr =
static_cast<
2938 typename ::internal::p4est::types<dim>::quadrant *
>(
2939 sc_array_index(¶llel_ghost->ghosts, g_idx));
2941 unsigned int coarse_cell_index =
2942 p4est_tree_to_coarse_cell_permutation[ghost_tree];
2944 match_quadrant<dim, spacedim>(
this,
2959 bool mesh_changed =
true;
2960 unsigned int loop_counter = 0;
2967 this->update_periodic_face_map();
2970 enforce_mesh_balance_over_periodic_boundaries(*
this);
2982 "parallel::distributed::Triangulation::copy_local_forest_to_triangulation() "
2983 "for periodic boundaries detected. Aborting."));
2985 while (mesh_changed);
2990 std::any_of(this->begin_active(),
2993 return cell.refine_flag_set() ||
2994 cell.coarsen_flag_set();
3012 while (mesh_changed);
3016 unsigned int num_ghosts = 0;
3018 for (
const auto &cell : this->active_cell_iterators())
3020 if (cell->subdomain_id() != this->my_subdomain &&
3025 Assert(num_ghosts == parallel_ghost->ghosts.elem_count,
3036 if (settings & construct_multigrid_hierarchy)
3042 for (
unsigned int lvl = this->n_levels(); lvl > 0;)
3045 for (
const auto &cell : this->cell_iterators_on_level(lvl))
3047 if ((cell->is_active() &&
3048 cell->subdomain_id() ==
3049 this->locally_owned_subdomain()) ||
3050 (cell->has_children() &&
3051 cell->child(0)->level_subdomain_id() ==
3052 this->locally_owned_subdomain()))
3053 cell->set_level_subdomain_id(
3054 this->locally_owned_subdomain());
3058 cell->set_level_subdomain_id(
3066 std::vector<std::vector<bool>> marked_vertices(this->n_levels());
3067 for (
unsigned int lvl = 0; lvl < this->n_levels(); ++lvl)
3068 marked_vertices[lvl] = mark_locally_active_vertices_on_level(lvl);
3070 for (
const auto &cell : this->cell_iterators_on_level(0))
3072 typename ::internal::p4est::types<dim>::quadrant
3074 const unsigned int tree_index =
3075 coarse_cell_to_p4est_tree_permutation[cell->index()];
3076 typename ::internal::p4est::types<dim>::tree *tree =
3077 init_tree(cell->index());
3079 ::internal::p4est::init_coarse_quadrant<dim>(
3082 determine_level_subdomain_id_recursively<dim, spacedim>(
3093 for (
unsigned int lvl = this->n_levels(); lvl > 0;)
3096 for (
const auto &cell : this->cell_iterators_on_level(lvl))
3098 if (cell->has_children())
3099 for (
unsigned int c = 0;
3100 c < GeometryInfo<dim>::max_children_per_cell;
3103 if (cell->child(c)->level_subdomain_id() ==
3104 this->locally_owned_subdomain())
3109 cell->child(0)->level_subdomain_id();
3113 cell->set_level_subdomain_id(mark);
3130 const unsigned int total_local_cells = this->n_active_cells();
3135 Assert(
static_cast<unsigned int>(
3136 parallel_forest->local_num_quadrants) == total_local_cells,
3141 Assert(
static_cast<unsigned int>(
3142 parallel_forest->local_num_quadrants) <= total_local_cells,
3147 unsigned int n_owned = 0;
3148 for (
const auto &cell : this->active_cell_iterators())
3150 if (cell->subdomain_id() == this->my_subdomain)
3154 Assert(
static_cast<unsigned int>(
3155 parallel_forest->local_num_quadrants) == n_owned,
3160 this->smooth_grid = save_smooth;
3166 update_cell_relations();
3171 template <
int dim,
int spacedim>
3177 std::vector<Point<dim>> point{p};
3178 std::vector<types::subdomain_id> owner = find_point_owner_rank(point);
3185 template <
int dim,
int spacedim>
3188 find_point_owner_rank(const
std::vector<
Point<dim>> &points)
3191 AssertThrow(this->are_vertices_communicated_to_p4est(),
3193 "Vertices need to be communicated to p4est to use this "
3194 "function. This must explicitly be turned on in the "
3195 "settings of the triangulation's constructor."));
3198 for (
const auto &manifold_id : this->get_manifold_ids())
3203 "This function can only be used if the triangulation "
3204 "has no other manifold than a Cartesian (flat) manifold attached."));
3208 PartitionSearch<dim> partition_search;
3214 parallel_forest->user_pointer = &partition_search;
3220 sc_array_t *point_sc_array;
3224 sc_array_new_count(
sizeof(
double[dim + 1]), points.size());
3227 for (
size_t i = 0; i < points.size(); ++i)
3232 double *this_sc_point =
3233 static_cast<double *
>(sc_array_index_ssize_t(point_sc_array, i));
3235 for (
unsigned int d = 0; d < dim; ++d)
3237 this_sc_point[d] = p(d);
3239 this_sc_point[dim] = -1.0;
3245 static_cast<int>(
false),
3246 &PartitionSearch<dim>::local_quadrant_fn,
3247 &PartitionSearch<dim>::local_point_fn,
3251 std::vector<types::subdomain_id> owner_rank(
3255 for (
size_t i = 0; i < points.size(); ++i)
3258 double *this_sc_point =
3259 static_cast<double *
>(sc_array_index_ssize_t(point_sc_array, i));
3260 Assert(this_sc_point[dim] >= 0. || this_sc_point[dim] == -1.,
3262 if (this_sc_point[dim] < 0.)
3270 parallel_forest->user_pointer =
this;
3273 sc_array_destroy_null(&point_sc_array);
3280 template <
int dim,
int spacedim>
3286 for (
const auto &cell : this->active_cell_iterators())
3287 if (cell->is_locally_owned() && cell->refine_flag_set())
3288 Assert(cell->refine_flag_set() ==
3291 "This class does not support anisotropic refinement"));
3296 if (this->n_levels() ==
3300 cell = this->begin_active(
3308 !(cell->refine_flag_set()),
3310 "Fatal Error: maximum refinement level of p4est reached."));
3314 this->prepare_coarsening_and_refinement();
3317 this->signals.pre_distributed_refinement();
3322 for (
const auto &cell : this->active_cell_iterators())
3323 if (cell->is_ghost() || cell->is_artificial())
3325 cell->clear_refine_flag();
3326 cell->clear_coarsen_flag();
3332 RefineAndCoarsenList<dim, spacedim> refine_and_coarsen_list(
3333 *
this, p4est_tree_to_coarse_cell_permutation, this->my_subdomain);
3340 parallel_forest->user_pointer = &refine_and_coarsen_list;
3342 if (parallel_ghost !=
nullptr)
3346 parallel_ghost =
nullptr;
3351 &RefineAndCoarsenList<dim, spacedim>::refine_callback,
3356 &RefineAndCoarsenList<dim, spacedim>::coarsen_callback,
3363 parallel_forest->user_pointer =
this;
3369 (dim == 2 ? typename ::internal::p4est::types<dim>::balance_type(
3370 P4EST_CONNECT_FULL) :
3371 typename ::internal::p4est::types<dim>::balance_type(
3372 P8EST_CONNECT_FULL)),
3377 update_cell_relations();
3381 this->signals.post_p4est_refinement();
3385 std::vector<typename ::internal::p4est::types<dim>::gloidx>
3386 previous_global_first_quadrant;
3388 if (this->cell_attached_data.n_attached_data_sets > 0)
3390 previous_global_first_quadrant.resize(parallel_forest->mpisize + 1);
3391 std::memcpy(previous_global_first_quadrant.data(),
3392 parallel_forest->global_first_quadrant,
3394 typename ::internal::p4est::types<dim>::gloidx) *
3395 (parallel_forest->mpisize + 1));
3398 if (!(settings & no_automatic_repartitioning))
3402 if (this->signals.weight.empty())
3410 const std::vector<unsigned int> cell_weights = get_cell_weights();
3416 this->mpi_communicator) > 0,
3418 "The global sum of weights over all active cells "
3419 "is zero. Please verify how you generate weights."));
3421 PartitionWeights<dim, spacedim> partition_weights(cell_weights);
3426 parallel_forest->user_pointer = &partition_weights;
3432 &PartitionWeights<dim, spacedim>::cell_weight);
3436 parallel_forest, 0,
nullptr,
nullptr);
3438 parallel_forest->user_pointer =
this;
3443 if (this->cell_attached_data.n_attached_data_sets > 0)
3445 this->data_serializer.pack_data(
3446 this->local_cell_relations,
3447 this->cell_attached_data.pack_callbacks_fixed,
3448 this->cell_attached_data.pack_callbacks_variable,
3449 this->get_mpi_communicator());
3455 for (
const auto &cell : this->active_cell_iterators())
3457 cell->clear_refine_flag();
3458 cell->clear_coarsen_flag();
3463 copy_local_forest_to_triangulation();
3473 if (this->cell_attached_data.n_attached_data_sets > 0)
3475 this->execute_transfer(parallel_forest,
3476 previous_global_first_quadrant.data());
3479 this->data_serializer.unpack_cell_status(this->local_cell_relations);
3498 if (settings & construct_multigrid_hierarchy)
3500 for (
unsigned int lvl = 0; lvl < this->n_global_levels(); ++lvl)
3502 std::vector<bool> active_verts =
3503 this->mark_locally_active_vertices_on_level(lvl);
3505 const unsigned int maybe_coarser_lvl =
3506 (lvl > 0) ? (lvl - 1) : lvl;
3508 cell = this->begin(maybe_coarser_lvl),
3509 endc = this->end(lvl);
3510 for (; cell != endc; ++cell)
3511 if (cell->level() ==
static_cast<int>(lvl) || cell->is_active())
3513 const bool is_level_artificial =
3514 (cell->level_subdomain_id() ==
3516 bool need_to_know =
false;
3517 for (
const unsigned int vertex :
3519 if (active_verts[cell->vertex_index(vertex)])
3521 need_to_know =
true;
3526 !need_to_know || !is_level_artificial,
3528 "Internal error: the owner of cell" +
3529 cell->id().to_string() +
3530 " is unknown even though it is needed for geometric multigrid."));
3536 this->update_periodic_face_map();
3537 this->update_number_cache();
3540 this->signals.post_distributed_refinement();
3545 template <
int dim,
int spacedim>
3550 for (
const auto &cell : this->active_cell_iterators())
3551 if (cell->is_locally_owned())
3553 !cell->refine_flag_set() && !cell->coarsen_flag_set(),
3555 "Error: There shouldn't be any cells flagged for coarsening/refinement when calling repartition()."));
3559 this->signals.pre_distributed_repartition();
3563 std::vector<typename ::internal::p4est::types<dim>::gloidx>
3564 previous_global_first_quadrant;
3566 if (this->cell_attached_data.n_attached_data_sets > 0)
3568 previous_global_first_quadrant.resize(parallel_forest->mpisize + 1);
3569 std::memcpy(previous_global_first_quadrant.data(),
3570 parallel_forest->global_first_quadrant,
3572 typename ::internal::p4est::types<dim>::gloidx) *
3573 (parallel_forest->mpisize + 1));
3576 if (this->signals.weight.empty())
3588 const std::vector<unsigned int> cell_weights = get_cell_weights();
3594 this->mpi_communicator) > 0,
3596 "The global sum of weights over all active cells "
3597 "is zero. Please verify how you generate weights."));
3599 PartitionWeights<dim, spacedim> partition_weights(cell_weights);
3604 parallel_forest->user_pointer = &partition_weights;
3610 &PartitionWeights<dim, spacedim>::cell_weight);
3613 parallel_forest->user_pointer =
this;
3617 if (this->cell_attached_data.n_attached_data_sets > 0)
3619 this->data_serializer.pack_data(
3620 this->local_cell_relations,
3621 this->cell_attached_data.pack_callbacks_fixed,
3622 this->cell_attached_data.pack_callbacks_variable,
3623 this->get_mpi_communicator());
3628 copy_local_forest_to_triangulation();
3638 if (this->cell_attached_data.n_attached_data_sets > 0)
3640 this->execute_transfer(parallel_forest,
3641 previous_global_first_quadrant.data());
3644 this->update_periodic_face_map();
3647 this->update_number_cache();
3650 this->signals.post_distributed_repartition();
3655 template <
int dim,
int spacedim>
3657 const std::vector<types::global_dof_index>
3661 return p4est_tree_to_coarse_cell_permutation;
3666 template <
int dim,
int spacedim>
3668 const std::vector<types::global_dof_index>
3672 return coarse_cell_to_p4est_tree_permutation;
3677 template <
int dim,
int spacedim>
3680 mark_locally_active_vertices_on_level(const
int level)
const
3684 std::vector<bool> marked_vertices(this->n_vertices(),
false);
3685 for (
const auto &cell : this->cell_iterators_on_level(
level))
3686 if (cell->level_subdomain_id() == this->locally_owned_subdomain())
3688 marked_vertices[cell->vertex_index(v)] =
true;
3705 for (
unsigned int repetition = 0; repetition < dim; ++repetition)
3706 for (
const auto &it : this->get_periodic_face_map())
3709 const unsigned int face_no_1 = it.first.second;
3711 const unsigned int face_no_2 = it.second.first.second;
3712 const unsigned char combined_orientation = it.second.second;
3713 const auto [orientation, rotation, flip] =
3716 if (cell_1->level() ==
level && cell_2->level() ==
level)
3718 for (
unsigned int v = 0;
3724 const unsigned int vface0 =
3726 v, orientation, flip, rotation);
3727 if (marked_vertices[cell_1->face(face_no_1)->vertex_index(
3729 marked_vertices[cell_2->face(face_no_2)->vertex_index(
3731 marked_vertices[cell_1->face(face_no_1)->vertex_index(
3733 marked_vertices[cell_2->face(face_no_2)->vertex_index(
3739 return marked_vertices;
3744 template <
int dim,
int spacedim>
3747 coarse_cell_id_to_coarse_cell_index(
3748 const
types::coarse_cell_id coarse_cell_id)
const
3750 return p4est_tree_to_coarse_cell_permutation[coarse_cell_id];
3755 template <
int dim,
int spacedim>
3759 const unsigned int coarse_cell_index)
const
3761 return coarse_cell_to_p4est_tree_permutation[coarse_cell_index];
3766 template <
int dim,
int spacedim>
3770 &periodicity_vector)
3772 Assert(triangulation_has_content ==
true,
3774 Assert(this->n_levels() == 1,
3775 ExcMessage(
"The triangulation is refined!"));
3782 const auto reference_cell = ReferenceCells::get_hypercube<dim>();
3784 for (
const auto &face_pair : periodicity_vector)
3788 const unsigned int face_left = face_pair.face_idx[0];
3789 const unsigned int face_right = face_pair.face_idx[1];
3792 const unsigned int tree_left =
3793 coarse_cell_to_p4est_tree_permutation[first_cell->index()];
3794 const unsigned int tree_right =
3795 coarse_cell_to_p4est_tree_permutation[second_cell->index()];
3803 unsigned int p4est_orientation = 0;
3808 face_pair.orientation ==
3815 const unsigned int face_idx_list[] = {face_left, face_right};
3816 const cell_iterator cell_list[] = {first_cell, second_cell};
3817 unsigned int lower_idx, higher_idx;
3818 unsigned char orientation;
3819 if (face_left <= face_right)
3824 face_reference_cell.get_inverse_combined_orientation(
3825 face_pair.orientation);
3831 orientation = face_pair.orientation;
3836 unsigned int first_p4est_idx_on_cell =
3837 p8est_face_corners[face_idx_list[lower_idx]][0];
3838 unsigned int first_dealii_idx_on_face =
3840 for (
unsigned int i = 0; i < GeometryInfo<dim>::vertices_per_face;
3843 const unsigned int first_dealii_idx_on_cell =
3845 face_idx_list[lower_idx],
3847 cell_list[lower_idx]->face_orientation(
3848 face_idx_list[lower_idx]),
3849 cell_list[lower_idx]->face_flip(face_idx_list[lower_idx]),
3850 cell_list[lower_idx]->face_rotation(
3851 face_idx_list[lower_idx]));
3852 if (first_p4est_idx_on_cell == first_dealii_idx_on_cell)
3854 first_dealii_idx_on_face = i;
3862 const unsigned int second_dealii_idx_on_face =
3863 reference_cell.standard_to_real_face_vertex(
3864 first_dealii_idx_on_face,
3865 face_idx_list[lower_idx],
3867 const unsigned int second_dealii_idx_on_cell =
3868 reference_cell.face_to_cell_vertices(
3869 face_idx_list[higher_idx],
3870 second_dealii_idx_on_face,
3871 cell_list[higher_idx]->combined_face_orientation(
3872 face_idx_list[higher_idx]));
3874 const unsigned int second_p4est_idx_on_face =
3875 p8est_corner_face_corners[second_dealii_idx_on_cell]
3876 [face_idx_list[higher_idx]];
3877 p4est_orientation = second_p4est_idx_on_face;
3897 this->mpi_communicator,
3908 copy_local_forest_to_triangulation();
3919 this->update_number_cache();
3924 template <
int dim,
int spacedim>
3935 this->cell_attached_data.n_attached_data_sets) +
3942 coarse_cell_to_p4est_tree_permutation) +
3944 p4est_tree_to_coarse_cell_permutation) +
3945 memory_consumption_p4est();
3952 template <
int dim,
int spacedim>
3956 return ::internal::p4est::functions<dim>::forest_memory_used(
3964 template <
int dim,
int spacedim>
3971 const ::parallel::distributed::Triangulation<dim, spacedim> *
>(
3973 (other_tria.n_global_levels() == 1),
3984 const typename ::Triangulation<dim, spacedim>::DistortedCellList
3992 if (const ::parallel::distributed::Triangulation<dim, spacedim>
3993 *other_distributed =
3994 dynamic_cast<const ::parallel::distributed::
3995 Triangulation<dim, spacedim> *
>(&other_tria))
3998 settings = other_distributed->settings;
3999 triangulation_has_content =
4000 other_distributed->triangulation_has_content;
4001 coarse_cell_to_p4est_tree_permutation =
4002 other_distributed->coarse_cell_to_p4est_tree_permutation;
4003 p4est_tree_to_coarse_cell_permutation =
4004 other_distributed->p4est_tree_to_coarse_cell_permutation;
4007 typename ::internal::p4est::types<dim>::connectivity
4008 *temp_connectivity =
const_cast<
4009 typename ::internal::p4est::types<dim>::connectivity *
>(
4010 other_distributed->connectivity);
4012 ::internal::p4est::copy_connectivity<dim>(temp_connectivity);
4015 typename ::internal::p4est::types<dim>::forest *temp_forest =
4016 const_cast<typename ::internal::p4est::types<dim>::forest *
>(
4017 other_distributed->parallel_forest);
4021 parallel_forest->connectivity = connectivity;
4022 parallel_forest->user_pointer =
this;
4026 triangulation_has_content =
true;
4027 setup_coarse_cell_to_p4est_tree_permutation();
4028 copy_new_triangulation_to_p4est(std::integral_constant<int, dim>());
4033 copy_local_forest_to_triangulation();
4042 this->update_periodic_face_map();
4043 this->update_number_cache();
4048 template <
int dim,
int spacedim>
4053 this->local_cell_relations.resize(parallel_forest->local_num_quadrants);
4054 this->local_cell_relations.shrink_to_fit();
4057 for (
const auto &cell : this->cell_iterators_on_level(0))
4060 if (tree_exists_locally<dim, spacedim>(
4062 coarse_cell_to_p4est_tree_permutation[cell->index()]) ==
false)
4066 typename ::internal::p4est::types<dim>::quadrant
4068 ::internal::p4est::init_coarse_quadrant<dim>(p4est_coarse_cell);
4071 typename ::internal::p4est::types<dim>::tree *tree =
4072 init_tree(cell->index());
4074 update_cell_relations_recursively<dim, spacedim>(
4075 this->local_cell_relations, *tree, cell, p4est_coarse_cell);
4081 template <
int dim,
int spacedim>
4088 Assert(this->local_cell_relations.size() ==
4089 static_cast<unsigned int>(parallel_forest->local_num_quadrants),
4094 std::vector<unsigned int> weights;
4095 weights.reserve(this->local_cell_relations.size());
4103 for (
const auto &cell_rel : this->local_cell_relations)
4105 const auto &cell_it = cell_rel.first;
4106 const auto &cell_status = cell_rel.second;
4108 weights.push_back(this->signals.weight(cell_it, cell_status));
4116 template <
int spacedim>
4132 template <
int spacedim>
4141 template <
int spacedim>
4143 const std::vector<types::global_dof_index>
4147 static std::vector<types::global_dof_index> a;
4153 template <
int spacedim>
4155 std::map<
unsigned int,
4158 const unsigned int )
const
4162 return std::map<unsigned int, std::set<::types::subdomain_id>>();
4167 template <
int spacedim>
4170 mark_locally_active_vertices_on_level(const
unsigned int)
const
4173 return std::vector<bool>();
4178 template <
int spacedim>
4181 coarse_cell_id_to_coarse_cell_index(const
types::coarse_cell_id)
const
4189 template <
int spacedim>
4193 const unsigned int)
const
4201 template <
int spacedim>
4210 template <
int spacedim>
4219 template <
int spacedim>
4229 template <
int spacedim>
4239 template <
int spacedim>
4256 namespace distributed
4258 template <
int dim,
int spacedim>
4266#ifdef DEAL_II_WITH_P4EST
4276 const auto &cell = pair.first;
4277 const auto &status = pair.second;
4283 cell->clear_refine_flag();
4284 cell->clear_coarsen_flag();
4289 cell->clear_coarsen_flag();
4290 cell->set_refine_flag();
4295 for (
const auto &child : cell->child_iterators())
4297 child->clear_refine_flag();
4298 child->set_coarsen_flag();
4317 template <
int dim,
int spacedim>
4320#ifdef DEAL_II_WITH_P4EST
4321 if (distributed_tria)
4324 distributed_tria->load_coarsen_flags(saved_coarsen_flags);
4325 distributed_tria->load_refine_flags(saved_refine_flags);
4329 (void)distributed_tria;
@ children_will_be_coarsened
static constexpr unsigned char default_combined_face_orientation()
virtual void add_periodicity(const std::vector< GridTools::PeriodicFacePair< cell_iterator > > &)
const std::map< std::pair< cell_iterator, unsigned int >, std::pair< std::pair< cell_iterator, unsigned int >, unsigned char > > & get_periodic_face_map() const
active_cell_iterator last_active() const
virtual void create_triangulation(const std::vector< Point< spacedim > > &vertices, const std::vector< CellData< dim > > &cells, const SubCellData &subcelldata)
cell_iterator end() const
virtual types::coarse_cell_id coarse_cell_index_to_coarse_cell_id(const unsigned int coarse_cell_index) const
virtual void execute_coarsening_and_refinement()
virtual bool prepare_coarsening_and_refinement()
void save_refine_flags(std::ostream &out) const
unsigned int n_vertices() const
void save_coarsen_flags(std::ostream &out) const
active_cell_iterator begin_active(const unsigned int level=0) const
virtual std::size_t memory_consumption() const override
virtual void clear() override
virtual void copy_triangulation(const ::Triangulation< dim, spacedim > &old_tria) override
~TemporarilyMatchRefineFlags()
const ObserverPointer< ::parallel::distributed::Triangulation< dim, spacedim > > distributed_tria
std::vector< bool > saved_refine_flags
std::vector< bool > saved_coarsen_flags
virtual void clear() override
#define DEAL_II_NAMESPACE_OPEN
#define DEAL_II_CXX20_REQUIRES(condition)
#define DEAL_II_NAMESPACE_CLOSE
static ::ExceptionBase & ExcIO()
static ::ExceptionBase & ExcNotImplemented()
#define Assert(cond, exc)
#define AssertNothrow(cond, exc)
#define AssertIndexRange(index, range)
static ::ExceptionBase & ExcInternalError()
static ::ExceptionBase & ExcMessage(std::string arg1)
#define AssertThrow(cond, exc)
typename ::Triangulation< dim, spacedim >::cell_iterator cell_iterator
typename ::Triangulation< dim, spacedim >::active_cell_iterator active_cell_iterator
#define DEAL_II_ASSERT_UNREACHABLE()
#define DEAL_II_NOT_IMPLEMENTED()
std::enable_if_t< std::is_fundamental_v< T >, std::size_t > memory_consumption(const T &t)
Point< spacedim > point(const gp_Pnt &p, const double tolerance=1e-10)
SymmetricTensor< 2, dim, Number > e(const Tensor< 2, dim, Number > &F)
Tensor< 2, dim, Number > l(const Tensor< 2, dim, Number > &F, const Tensor< 2, dim, Number > &dF_dt)
SymmetricTensor< 2, dim, Number > d(const Tensor< 2, dim, Number > &F, const Tensor< 2, dim, Number > &dF_dt)
constexpr const ReferenceCell & get_hypercube()
VectorType::value_type * end(VectorType &V)
T sum(const T &t, const MPI_Comm mpi_communicator)
unsigned int n_mpi_processes(const MPI_Comm mpi_communicator)
unsigned int this_mpi_process(const MPI_Comm mpi_communicator)
T broadcast(const MPI_Comm comm, const T &object_to_send, const unsigned int root_process=0)
std::vector< Integer > invert_permutation(const std::vector< Integer > &permutation)
bool tree_exists_locally(const typename types< dim >::forest *parallel_forest, const typename types< dim >::topidx coarse_grid_cell)
void exchange_refinement_flags(::parallel::distributed::Triangulation< dim, spacedim > &tria)
std::tuple< bool, bool, bool > split_face_orientation(const unsigned char combined_face_orientation)
const types::subdomain_id artificial_subdomain_id
const types::subdomain_id invalid_subdomain_id
static const unsigned int invalid_unsigned_int
const types::manifold_id flat_manifold_id
::VectorizedArray< Number, width > min(const ::VectorizedArray< Number, width > &, const ::VectorizedArray< Number, width > &)
const ::parallel::distributed::Triangulation< dim, spacedim > * triangulation
static unsigned int standard_to_real_face_vertex(const unsigned int vertex, const bool face_orientation=true, const bool face_flip=false, const bool face_rotation=false)
static unsigned int face_to_cell_vertices(const unsigned int face, const unsigned int vertex, const bool face_orientation=true, const bool face_flip=false, const bool face_rotation=false)
static std_cxx20::ranges::iota_view< unsigned int, unsigned int > vertex_indices()
static bool is_inside_unit_cell(const Point< dim > &p)
static Point< dim > unit_cell_vertex(const unsigned int vertex)