From: wolf Date: Fri, 10 Sep 1999 08:02:08 +0000 (+0000) Subject: Add the slit domain to the possible ones. X-Git-Url: https://gitweb.dealii.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=cbe2af90f403d4737fd6cd0e9885e716286814ee;p=dealii-svn.git Add the slit domain to the possible ones. git-svn-id: https://svn.dealii.org/trunk@1730 0785d39b-7218-0410-832d-ea1e28bc413d --- diff --git a/deal.II/deal.II/Attic/examples/poisson/problem.cc b/deal.II/deal.II/Attic/examples/poisson/problem.cc index 160c6e4a66..09ea3ce09a 100644 --- a/deal.II/deal.II/Attic/examples/poisson/problem.cc +++ b/deal.II/deal.II/Attic/examples/poisson/problem.cc @@ -304,7 +304,7 @@ void PoissonProblem::declare_parameters (ParameterHandler &prm) { if (dim>=2) prm.declare_entry ("Test run", "zoom in", Patterns::Selection("tensor|zoom in|ball|curved line|" - "random|jump|L-region")); + "random|jump|L-region|slit domain")); else prm.declare_entry ("Test run", "zoom in", Patterns::Selection("tensor|zoom in|random")); @@ -339,10 +339,12 @@ bool PoissonProblem::make_grid (ParameterHandler &prm) { else if (test=="L-region") test_case = 7; else - { - cerr << "This test seems not to be implemented!" << endl; - return false; - }; + if (test=="slit domain") test_case = 8; + else + { + cerr << "This test seems not to be implemented!" << endl; + return false; + }; switch (test_case) { @@ -396,6 +398,11 @@ bool PoissonProblem::make_grid (ParameterHandler &prm) { tria->set_boundary (0, *boundary); GridGenerator::hyper_L (*tria); break; + case 8: + boundary = new StraightBoundary(); + tria->set_boundary (0, *boundary); + GridGenerator::hyper_cube_slit (*tria); + break; default: return false; }; diff --git a/tests/big-tests/poisson/problem.cc b/tests/big-tests/poisson/problem.cc index 160c6e4a66..09ea3ce09a 100644 --- a/tests/big-tests/poisson/problem.cc +++ b/tests/big-tests/poisson/problem.cc @@ -304,7 +304,7 @@ void PoissonProblem::declare_parameters (ParameterHandler &prm) { if (dim>=2) prm.declare_entry ("Test run", "zoom in", Patterns::Selection("tensor|zoom in|ball|curved line|" - "random|jump|L-region")); + "random|jump|L-region|slit domain")); else prm.declare_entry ("Test run", "zoom in", Patterns::Selection("tensor|zoom in|random")); @@ -339,10 +339,12 @@ bool PoissonProblem::make_grid (ParameterHandler &prm) { else if (test=="L-region") test_case = 7; else - { - cerr << "This test seems not to be implemented!" << endl; - return false; - }; + if (test=="slit domain") test_case = 8; + else + { + cerr << "This test seems not to be implemented!" << endl; + return false; + }; switch (test_case) { @@ -396,6 +398,11 @@ bool PoissonProblem::make_grid (ParameterHandler &prm) { tria->set_boundary (0, *boundary); GridGenerator::hyper_L (*tria); break; + case 8: + boundary = new StraightBoundary(); + tria->set_boundary (0, *boundary); + GridGenerator::hyper_cube_slit (*tria); + break; default: return false; };