From: Martin Kronbichler <kronbichler@lnm.mw.tum.de>
Date: Wed, 22 Jul 2015 08:17:14 +0000 (+0200)
Subject: Test case for cell similarity
X-Git-Tag: v8.4.0-rc2~736^2
X-Git-Url: https://gitweb.dealii.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=7b52b286280637aa6a624221969e75383d77f797;p=dealii.git

Test case for cell similarity
---

diff --git a/tests/fe/cell_similarity_11.cc b/tests/fe/cell_similarity_11.cc
new file mode 100644
index 0000000000..151e69f079
--- /dev/null
+++ b/tests/fe/cell_similarity_11.cc
@@ -0,0 +1,134 @@
+// ---------------------------------------------------------------------
+//
+// Copyright (C) 2009 - 2015 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.
+//
+// ---------------------------------------------------------------------
+
+
+
+// since early 2009, the FEValues objects try to be more efficient by only
+// recomputing things like gradients of shape functions if the cell on which
+// we are is not a translation of the previous one. in this series of tests we
+// make sure that this actually works the way it's supposed to be. As opposed
+// to the tests 01-10, this test uses a more complicated geometry that forces
+// a MappingQ to switch between a Q1 while passing through the mesh
+//
+// this tests outputs the Jacobian of the transformation and the derivatives
+// in real space in two locations inside the cell. to make sure the cell
+// similarity code is used, only run the program with one thread
+
+
+#include "../tests.h"
+#include <deal.II/base/logstream.h>
+#include <deal.II/base/function.h>
+#include <deal.II/base/quadrature_lib.h>
+#include <deal.II/base/multithread_info.h>
+#include <deal.II/grid/grid_generator.h>
+#include <deal.II/grid/tria_boundary_lib.h>
+#include <deal.II/dofs/dof_handler.h>
+#include <deal.II/fe/fe_q.h>
+#include <deal.II/fe/fe_values.h>
+#include <deal.II/fe/mapping_q.h>
+
+#include <fstream>
+
+
+template<int dim>
+void test (const Triangulation<dim> &tr)
+{
+  FE_Q<dim> fe(2);
+  deallog << "FE=" << fe.get_name() << std::endl;
+
+  MappingQ<dim> mapping(2);
+  deallog << "Mapping=MappingQ2" << std::endl;
+
+
+  DoFHandler<dim> dof(tr);
+  dof.distribute_dofs(fe);
+
+  std::vector<Point<dim> > points(2);
+  for (unsigned int d=0; d<dim; ++d)
+    points[0][d] = 0.1;
+  for (unsigned int d=0; d<dim; ++d)
+    points[1][d] = 0.85;
+
+  const Quadrature<dim> quadrature(points);
+  FEValues<dim> fe_values (mapping, fe, quadrature,
+                           update_gradients | update_jacobians);
+
+  for (typename DoFHandler<dim>::active_cell_iterator
+       cell = dof.begin_active();
+       cell != dof.end(); ++cell)
+    {
+      fe_values.reinit (cell);
+
+      deallog << "Jacobians: ";
+      for (unsigned int q=0; q<fe_values.n_quadrature_points; ++q)
+        {
+          deallog << "[ ";
+          for (unsigned int d=0; d<dim; ++d)
+            for (unsigned int e=0; e<dim; ++e)
+              deallog << fe_values.jacobian(q)[d][e] << " ";
+          deallog << " ] ";
+        }
+      deallog << std::endl;
+      deallog << "Derivatives of shape function: ";
+      for (unsigned int q=0; q<fe_values.n_quadrature_points; ++q)
+        {
+          deallog << "[ ";
+          for (unsigned int d=0; d<dim; ++d)
+            deallog << fe_values.shape_grad(fe.dofs_per_cell/2,q)[d] << " ";
+          deallog << " ] ";
+        }
+      deallog << std::endl;
+    }
+}
+
+
+
+void test()
+{
+  // Create a mesh where the cell in the center uses a Q1 mapping but one cell
+  // on the boundary uses a Q3 mapping from a hyper ball. The radius is
+  // sqrt(1/9+1) which makes sure the mapping connects to the linear boundary
+  // for the other cells.
+  const int dim = 2;
+  Triangulation<dim> tr;
+  GridGenerator::subdivided_hyper_cube(tr, 3, -1, 1);
+
+  for (Triangulation<dim>::cell_iterator cell = tr.begin();
+       cell != tr.end(); ++cell)
+    for (unsigned int f=0; f<GeometryInfo<dim>::faces_per_cell; ++f)
+      if (cell->face(f)->at_boundary() &&
+          std::abs(cell->face(f)->center()[0]+1.) < 1e-12 &&
+          std::abs(cell->face(f)->center()[1]) < 1e-12)
+        cell->face(f)->set_boundary_id(1);
+
+  static const HyperBallBoundary<dim> boundary(Point<dim>(), std::sqrt(1./9.+1.));
+  tr.set_boundary (1, boundary);
+
+  test<dim>(tr);
+}
+
+
+int main()
+{
+  std::ofstream logfile ("output");
+  deallog << std::setprecision (8);
+  MultithreadInfo::set_thread_limit(1);
+
+  deallog.attach(logfile);
+  deallog.depth_console (0);
+  deallog.threshold_double(1.e-10);
+
+  test();
+}
diff --git a/tests/fe/cell_similarity_11.output b/tests/fe/cell_similarity_11.output
new file mode 100644
index 0000000000..672f6b7d31
--- /dev/null
+++ b/tests/fe/cell_similarity_11.output
@@ -0,0 +1,21 @@
+
+DEAL::FE=FE_Q<2>(2)
+DEAL::Mapping=MappingQ2
+DEAL::Jacobians: [ 0.66666667 0 0 0.66666667  ] [ 0.66666667 0 0 0.66666667  ] 
+DEAL::Derivatives of shape function: [ -1.4040000 3.4560000  ] [ 0.30600000 0.44100000  ] 
+DEAL::Jacobians: [ 0.66666667 0 0 0.66666667  ] [ 0.66666667 0 0 0.66666667  ] 
+DEAL::Derivatives of shape function: [ -1.4040000 3.4560000  ] [ 0.30600000 0.44100000  ] 
+DEAL::Jacobians: [ 0.66666667 0 0 0.66666667  ] [ 0.66666667 0 0 0.66666667  ] 
+DEAL::Derivatives of shape function: [ -1.4040000 3.4560000  ] [ 0.30600000 0.44100000  ] 
+DEAL::Jacobians: [ 0.70561331 -0.13631323 0 0.66666667  ] [ 0.67011507 -0.0014199295 0 0.66666667  ] 
+DEAL::Derivatives of shape function: [ -1.3265056 3.1847696  ] [ 0.30442533 0.44164839  ] 
+DEAL::Jacobians: [ 0.66666667 0 0 0.66666667  ] [ 0.66666667 0 0 0.66666667  ] 
+DEAL::Derivatives of shape function: [ -1.4040000 3.4560000  ] [ 0.30600000 0.44100000  ] 
+DEAL::Jacobians: [ 0.66666667 0 0 0.66666667  ] [ 0.66666667 0 0 0.66666667  ] 
+DEAL::Derivatives of shape function: [ -1.4040000 3.4560000  ] [ 0.30600000 0.44100000  ] 
+DEAL::Jacobians: [ 0.66666667 0 0 0.66666667  ] [ 0.66666667 0 0 0.66666667  ] 
+DEAL::Derivatives of shape function: [ -1.4040000 3.4560000  ] [ 0.30600000 0.44100000  ] 
+DEAL::Jacobians: [ 0.66666667 0 0 0.66666667  ] [ 0.66666667 0 0 0.66666667  ] 
+DEAL::Derivatives of shape function: [ -1.4040000 3.4560000  ] [ 0.30600000 0.44100000  ] 
+DEAL::Jacobians: [ 0.66666667 0 0 0.66666667  ] [ 0.66666667 0 0 0.66666667  ] 
+DEAL::Derivatives of shape function: [ -1.4040000 3.4560000  ] [ 0.30600000 0.44100000  ]