]> https://gitweb.dealii.org/ - dealii.git/commitdiff
Add a bunch of missing tests for Utilities::MPI::max. 183/head
authorWolfgang Bangerth <bangerth@math.tamu.edu>
Mon, 29 Sep 2014 15:24:58 +0000 (10:24 -0500)
committerWolfgang Bangerth <bangerth@math.tamu.edu>
Mon, 29 Sep 2014 15:24:58 +0000 (10:24 -0500)
12 files changed:
tests/mpi/collective_03_array_in_place.cc [new file with mode: 0644]
tests/mpi/collective_03_array_in_place.mpirun=1.output [new file with mode: 0644]
tests/mpi/collective_03_array_in_place.mpirun=10.output [new file with mode: 0644]
tests/mpi/collective_03_array_in_place.mpirun=4.output [new file with mode: 0644]
tests/mpi/collective_03_vector.cc [new file with mode: 0644]
tests/mpi/collective_03_vector.mpirun=1.output [new file with mode: 0644]
tests/mpi/collective_03_vector.mpirun=10.output [new file with mode: 0644]
tests/mpi/collective_03_vector.mpirun=4.output [new file with mode: 0644]
tests/mpi/collective_03_vector_in_place.cc [new file with mode: 0644]
tests/mpi/collective_03_vector_in_place.mpirun=1.output [new file with mode: 0644]
tests/mpi/collective_03_vector_in_place.mpirun=10.output [new file with mode: 0644]
tests/mpi/collective_03_vector_in_place.mpirun=4.output [new file with mode: 0644]

diff --git a/tests/mpi/collective_03_array_in_place.cc b/tests/mpi/collective_03_array_in_place.cc
new file mode 100644 (file)
index 0000000..9c61e2e
--- /dev/null
@@ -0,0 +1,66 @@
+// ---------------------------------------------------------------------
+//
+// 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.
+//
+// ---------------------------------------------------------------------
+
+
+
+// check Utilities::MPI::max() for arrays, but with input=output
+
+#include "../tests.h"
+#include <deal.II/base/logstream.h>
+#include <deal.II/base/utilities.h>
+#include <fstream>
+
+void test()
+{
+  unsigned int myid = Utilities::MPI::this_mpi_process (MPI_COMM_WORLD);
+  const unsigned int numprocs = Utilities::MPI::n_mpi_processes (MPI_COMM_WORLD);
+
+  unsigned int maxima[2] = { 1, 2 };
+  Utilities::MPI::max (maxima,
+                       MPI_COMM_WORLD,
+                       maxima);
+  Assert (maxima[0] == 1, ExcInternalError());
+  Assert (maxima[1] == 2, ExcInternalError());
+
+  if (myid==0)
+    deallog << maxima[0] << ' ' << maxima[1] << std::endl;
+}
+
+
+int main(int argc, char *argv[])
+{
+#ifdef DEAL_II_WITH_MPI
+  Utilities::MPI::MPI_InitFinalize mpi (argc, argv);
+#else
+  (void)argc;
+  (void)argv;
+  compile_time_error;
+
+#endif
+
+  if (Utilities::MPI::this_mpi_process (MPI_COMM_WORLD) == 0)
+    {
+      std::ofstream logfile("output");
+      deallog.attach(logfile);
+      deallog.depth_console(0);
+      deallog.threshold_double(1.e-10);
+
+      deallog.push("mpi");
+      test();
+      deallog.pop();
+    }
+  else
+    test();
+}
diff --git a/tests/mpi/collective_03_array_in_place.mpirun=1.output b/tests/mpi/collective_03_array_in_place.mpirun=1.output
new file mode 100644 (file)
index 0000000..6e10373
--- /dev/null
@@ -0,0 +1,2 @@
+
+DEAL:mpi::1 2
diff --git a/tests/mpi/collective_03_array_in_place.mpirun=10.output b/tests/mpi/collective_03_array_in_place.mpirun=10.output
new file mode 100644 (file)
index 0000000..6e10373
--- /dev/null
@@ -0,0 +1,2 @@
+
+DEAL:mpi::1 2
diff --git a/tests/mpi/collective_03_array_in_place.mpirun=4.output b/tests/mpi/collective_03_array_in_place.mpirun=4.output
new file mode 100644 (file)
index 0000000..6e10373
--- /dev/null
@@ -0,0 +1,2 @@
+
+DEAL:mpi::1 2
diff --git a/tests/mpi/collective_03_vector.cc b/tests/mpi/collective_03_vector.cc
new file mode 100644 (file)
index 0000000..11da0bf
--- /dev/null
@@ -0,0 +1,68 @@
+// ---------------------------------------------------------------------
+//
+// 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.
+//
+// ---------------------------------------------------------------------
+
+
+
+// check Utilities::MPI::max() for vectors
+
+#include "../tests.h"
+#include <deal.II/base/logstream.h>
+#include <deal.II/base/utilities.h>
+#include <fstream>
+
+void test()
+{
+  unsigned int myid = Utilities::MPI::this_mpi_process (MPI_COMM_WORLD);
+  const unsigned int numprocs = Utilities::MPI::n_mpi_processes (MPI_COMM_WORLD);
+
+  unsigned int values_[2] = { 1, 2 };
+  std::vector<unsigned int> values(&values_[0], &values_[2]);
+  std::vector<unsigned int> maxima(2);
+  Utilities::MPI::max (values,
+                       MPI_COMM_WORLD,
+                       maxima);
+  Assert (maxima[0] == 1, ExcInternalError());
+  Assert (maxima[1] == 2, ExcInternalError());
+
+  if (myid==0)
+    deallog << maxima[0] << ' ' << maxima[1] << std::endl;
+}
+
+
+int main(int argc, char *argv[])
+{
+#ifdef DEAL_II_WITH_MPI
+  Utilities::MPI::MPI_InitFinalize mpi (argc, argv);
+#else
+  (void)argc;
+  (void)argv;
+  compile_time_error;
+
+#endif
+
+  if (Utilities::MPI::this_mpi_process (MPI_COMM_WORLD) == 0)
+    {
+      std::ofstream logfile("output");
+      deallog.attach(logfile);
+      deallog.depth_console(0);
+      deallog.threshold_double(1.e-10);
+
+      deallog.push("mpi");
+      test();
+      deallog.pop();
+    }
+  else
+    test();
+}
diff --git a/tests/mpi/collective_03_vector.mpirun=1.output b/tests/mpi/collective_03_vector.mpirun=1.output
new file mode 100644 (file)
index 0000000..6e10373
--- /dev/null
@@ -0,0 +1,2 @@
+
+DEAL:mpi::1 2
diff --git a/tests/mpi/collective_03_vector.mpirun=10.output b/tests/mpi/collective_03_vector.mpirun=10.output
new file mode 100644 (file)
index 0000000..6e10373
--- /dev/null
@@ -0,0 +1,2 @@
+
+DEAL:mpi::1 2
diff --git a/tests/mpi/collective_03_vector.mpirun=4.output b/tests/mpi/collective_03_vector.mpirun=4.output
new file mode 100644 (file)
index 0000000..6e10373
--- /dev/null
@@ -0,0 +1,2 @@
+
+DEAL:mpi::1 2
diff --git a/tests/mpi/collective_03_vector_in_place.cc b/tests/mpi/collective_03_vector_in_place.cc
new file mode 100644 (file)
index 0000000..716eb7f
--- /dev/null
@@ -0,0 +1,67 @@
+// ---------------------------------------------------------------------
+//
+// 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.
+//
+// ---------------------------------------------------------------------
+
+
+
+// check Utilities::MPI::max() for vectors, but with input=output
+
+#include "../tests.h"
+#include <deal.II/base/logstream.h>
+#include <deal.II/base/utilities.h>
+#include <fstream>
+
+void test()
+{
+  unsigned int myid = Utilities::MPI::this_mpi_process (MPI_COMM_WORLD);
+  const unsigned int numprocs = Utilities::MPI::n_mpi_processes (MPI_COMM_WORLD);
+
+  unsigned int values_[2] = { 1, 2 };
+  std::vector<unsigned int> maxima(&values_[0], &values_[2]);
+  Utilities::MPI::max (maxima,
+                       MPI_COMM_WORLD,
+                       maxima);
+  Assert (maxima[0] == 1, ExcInternalError());
+  Assert (maxima[1] == 2, ExcInternalError());
+
+  if (myid==0)
+    deallog << maxima[0] << ' ' << maxima[1] << std::endl;
+}
+
+
+int main(int argc, char *argv[])
+{
+#ifdef DEAL_II_WITH_MPI
+  Utilities::MPI::MPI_InitFinalize mpi (argc, argv);
+#else
+  (void)argc;
+  (void)argv;
+  compile_time_error;
+
+#endif
+
+  if (Utilities::MPI::this_mpi_process (MPI_COMM_WORLD) == 0)
+    {
+      std::ofstream logfile("output");
+      deallog.attach(logfile);
+      deallog.depth_console(0);
+      deallog.threshold_double(1.e-10);
+
+      deallog.push("mpi");
+      test();
+      deallog.pop();
+    }
+  else
+    test();
+}
diff --git a/tests/mpi/collective_03_vector_in_place.mpirun=1.output b/tests/mpi/collective_03_vector_in_place.mpirun=1.output
new file mode 100644 (file)
index 0000000..6e10373
--- /dev/null
@@ -0,0 +1,2 @@
+
+DEAL:mpi::1 2
diff --git a/tests/mpi/collective_03_vector_in_place.mpirun=10.output b/tests/mpi/collective_03_vector_in_place.mpirun=10.output
new file mode 100644 (file)
index 0000000..6e10373
--- /dev/null
@@ -0,0 +1,2 @@
+
+DEAL:mpi::1 2
diff --git a/tests/mpi/collective_03_vector_in_place.mpirun=4.output b/tests/mpi/collective_03_vector_in_place.mpirun=4.output
new file mode 100644 (file)
index 0000000..6e10373
--- /dev/null
@@ -0,0 +1,2 @@
+
+DEAL:mpi::1 2

In the beginning the Universe was created. This has made a lot of people very angry and has been widely regarded as a bad move.

Douglas Adams


Typeset in Trocchi and Trocchi Bold Sans Serif.