--- /dev/null
+// ---------------------------------------------------------------------
+//
+// Copyright (C) 2009 - 2014 by the deal.II authors
+//
+// This file is part of the deal.II library.
+//
+// The deal.II library is free software; you can use it, redistribute
+// it, and/or modify it under the terms of the GNU Lesser General
+// Public License as published by the Free Software Foundation; either
+// version 2.1 of the License, or (at your option) any later version.
+// The full text of the license can be found in the file LICENSE at
+// the top level of the deal.II distribution.
+//
+// ---------------------------------------------------------------------
+
+
+
+// test Triangulation::communicate_locally_moved_vertices()
+
+#include "../tests.h"
+#include "coarse_grid_common.h"
+#include <deal.II/base/logstream.h>
+#include <deal.II/base/tensor.h>
+#include <deal.II/grid/tria.h>
+#include <deal.II/distributed/tria.h>
+#include <deal.II/grid/tria_accessor.h>
+#include <deal.II/grid/grid_generator.h>
+#include <deal.II/grid/grid_out.h>
+#include <deal.II/grid/grid_tools.h>
+#include <deal.II/grid/grid_in.h>
+#include <deal.II/base/utilities.h>
+
+
+#include <fstream>
+
+
+template <int dim, int spacedim>
+std::vector<bool>
+get_locally_owned_vertices (const Triangulation<dim,spacedim> &triangulation)
+{
+ std::vector<bool> locally_owned_vertices = triangulation.get_used_vertices();
+
+ if (const parallel::distributed::Triangulation<dim,spacedim> *tr
+ = dynamic_cast<const parallel::distributed::Triangulation<dim,spacedim> *>
+ (&triangulation))
+ for (typename Triangulation<dim,spacedim>::active_cell_iterator
+ cell = triangulation.begin_active();
+ cell != triangulation.end(); ++cell)
+ if (cell->is_artificial()
+ ||
+ (cell->is_ghost() && (cell->subdomain_id() < tr->locally_owned_subdomain())))
+ for (unsigned int v=0; v<GeometryInfo<dim>::vertices_per_cell; ++v)
+ locally_owned_vertices[cell->vertex_index(v)] = false;
+
+ return locally_owned_vertices;
+}
+
+
+template<int dim>
+void test()
+{
+ const unsigned int myid = Utilities::MPI::this_mpi_process (MPI_COMM_WORLD);
+
+ // create a mesh twice refined and move those vertices we locally own
+ parallel::distributed::Triangulation<dim> tr(MPI_COMM_WORLD);
+ GridGenerator::hyper_cube(tr);
+ tr.refine_global(2);
+
+ const std::vector<bool> locally_owned_vertices
+ = get_locally_owned_vertices (tr);
+
+ if (myid == 0)
+ deallog << "#vertices = "
+ << tr.n_vertices()
+ << std::endl
+ << "#locally_owned_vertices = "
+ << std::count (locally_owned_vertices.begin(),
+ locally_owned_vertices.end(),
+ true)
+ << std::endl;
+
+ // now do the move
+ Point<dim> shift;
+ for (unsigned int d=0; d<dim; ++d)
+ shift[d] = 1;
+
+ unsigned int n_vertices_moved = 0;
+ for (unsigned int v=0; v<tr.n_vertices(); ++v)
+ if (locally_owned_vertices[v] == true)
+ {
+ // maybe not the most elegant way to do it, but it works for the purpose
+ // of the test...
+ const_cast<Point<dim>&>(tr.get_vertices()[v]) += shift;
+ ++n_vertices_moved;
+ }
+ Assert (Utilities::MPI::sum (n_vertices_moved, MPI_COMM_WORLD)
+ ==
+ (dim==2 ? 25 : 125),
+ ExcInternalError());
+
+ tr.communicate_locally_moved_vertices (locally_owned_vertices);
+
+ // let every processor write their triangulation into a file of their own,
+ // then collate
+ // write the info on ghost processors and import indices to file
+ {
+ std::ofstream file((std::string("communicate_moved_vertices_01.dat.") + Utilities::int_to_string(myid)).c_str());
+ GridOut().write_gnuplot (tr, file);
+ }
+
+ MPI_Barrier(MPI_COMM_WORLD);
+
+ if (myid==0)
+ {
+ for (unsigned int i=0; i<Utilities::MPI::n_mpi_processes(MPI_COMM_WORLD); ++i)
+ {
+ deallog << "Partition " << i << std::endl;
+
+ cat_file((std::string("communicate_moved_vertices_01.dat.") + Utilities::int_to_string(i)).c_str());
+ }
+
+ }
+
+
+ if (myid == 0)
+ deallog << "OK" << std::endl;
+}
+
+
+int main(int argc, char *argv[])
+{
+ Utilities::MPI::MPI_InitFinalize mpi_initialization(argc, argv, 1);
+ MPILogInitAll log;
+
+ deallog.push("2d");
+ test<2>();
+ deallog.pop();
+
+ deallog.push("3d");
+ test<3>();
+ deallog.pop();
+}
--- /dev/null
+// ---------------------------------------------------------------------
+//
+// Copyright (C) 2009 - 2014 by the deal.II authors
+//
+// This file is part of the deal.II library.
+//
+// The deal.II library is free software; you can use it, redistribute
+// it, and/or modify it under the terms of the GNU Lesser General
+// Public License as published by the Free Software Foundation; either
+// version 2.1 of the License, or (at your option) any later version.
+// The full text of the license can be found in the file LICENSE at
+// the top level of the deal.II distribution.
+//
+// ---------------------------------------------------------------------
+
+
+
+// test Triangulation::communicate_locally_moved_vertices(). like _01, but
+// only move some of the vertices
+
+#include "../tests.h"
+#include "coarse_grid_common.h"
+#include <deal.II/base/logstream.h>
+#include <deal.II/base/tensor.h>
+#include <deal.II/grid/tria.h>
+#include <deal.II/distributed/tria.h>
+#include <deal.II/grid/tria_accessor.h>
+#include <deal.II/grid/grid_generator.h>
+#include <deal.II/grid/grid_out.h>
+#include <deal.II/grid/grid_tools.h>
+#include <deal.II/grid/grid_in.h>
+#include <deal.II/base/utilities.h>
+
+
+#include <fstream>
+
+
+template<int dim>
+void test()
+{
+ const unsigned int myid = Utilities::MPI::this_mpi_process (MPI_COMM_WORLD);
+
+ // create a mesh twice refined and move those vertices we locally own
+ parallel::distributed::Triangulation<dim> tr(MPI_COMM_WORLD);
+ GridGenerator::hyper_cube(tr);
+ tr.refine_global(2);
+
+ // determine which vertices to move. only move those with x>1/3
+ std::vector<bool> moved_locally_owned_vertices
+ = GridTools::get_locally_owned_vertices (tr);
+ for (unsigned int v=0; v<tr.n_vertices(); ++v)
+ if ((moved_locally_owned_vertices[v] == true)
+ &&
+ (tr.get_vertices()[v][0] < 1./3))
+ moved_locally_owned_vertices[v] = false;
+
+ // now do the move
+ Point<dim> shift;
+ for (unsigned int d=0; d<dim; ++d)
+ shift[d] = 1;
+
+ unsigned int n_vertices_moved = 0;
+ for (unsigned int v=0; v<tr.n_vertices(); ++v)
+ if (moved_locally_owned_vertices[v] == true)
+ {
+ // maybe not the most elegant way to do it, but it works for the purpose
+ // of the test...
+ const_cast<Point<dim>&>(tr.get_vertices()[v]) += shift;
+ ++n_vertices_moved;
+ }
+ Assert (Utilities::MPI::sum (n_vertices_moved, MPI_COMM_WORLD)
+ ==
+ (dim==2 ? 15 : 75),
+ ExcInternalError());
+
+ tr.communicate_locally_moved_vertices (moved_locally_owned_vertices);
+
+ // let every processor write their triangulation into a file of their own,
+ // then collate
+ // write the info on ghost processors and import indices to file
+ {
+ std::ofstream file((std::string("communicate_moved_vertices_02.dat.") + Utilities::int_to_string(myid)).c_str());
+ GridOut().write_gnuplot (tr, file);
+ }
+
+ MPI_Barrier(MPI_COMM_WORLD);
+
+ if (myid==0)
+ {
+ for (unsigned int i=0; i<Utilities::MPI::n_mpi_processes(MPI_COMM_WORLD); ++i)
+ {
+ deallog << "Partition " << i << std::endl;
+
+ cat_file((std::string("communicate_moved_vertices_02.dat.") + Utilities::int_to_string(i)).c_str());
+ }
+ }
+
+
+ if (myid == 0)
+ deallog << "OK" << std::endl;
+}
+
+
+int main(int argc, char *argv[])
+{
+ Utilities::MPI::MPI_InitFinalize mpi_initialization(argc, argv, 1);
+ MPILogInitAll log;
+
+ deallog.push("2d");
+ test<2>();
+ deallog.pop();
+
+ deallog.push("3d");
+ test<3>();
+ deallog.pop();
+}
projects / dealii.git / commitdiff