From: wolf Date: Mon, 29 Mar 2004 22:32:21 +0000 (+0000) Subject: new tests. X-Git-Url: https://gitweb.dealii.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=ab73085c21cc6fa39a8fd048395b8a19ef806eb3;p=dealii-svn.git new tests. git-svn-id: https://svn.dealii.org/trunk@8905 0785d39b-7218-0410-832d-ea1e28bc413d --- diff --git a/tests/bits/dof_constraints_07.cc b/tests/bits/dof_constraints_07.cc index b4e4485130..59e9e3a46d 100644 --- a/tests/bits/dof_constraints_07.cc +++ b/tests/bits/dof_constraints_07.cc @@ -62,7 +62,7 @@ void test () deallog << "Number of constraints: " << constraints.n_constraints() << std::endl; std::vector block_sizes(2); - block_sizes[0] = dof_handler.n_dofs()/2; + block_sizes[0] = dof_handler.n_dofs()/3; block_sizes[1] = dof_handler.n_dofs() - block_sizes[0]; BlockVector b(block_sizes); for (unsigned int i=0; i +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include + + +template +void test () +{ + deallog << dim << "D" << std::endl; + + Triangulation triangulation; + GridGenerator::hyper_cube (triangulation); + + // refine once, then refine first cell to + // create hanging nodes + triangulation.refine_global (1); + triangulation.begin_active()->set_refine_flag (); + triangulation.execute_coarsening_and_refinement (); + deallog << "Number of cells: " << triangulation.n_active_cells() << std::endl; + + // set up a DoFHandler and compute hanging + // node constraints for a Q2 element + FE_Q fe(2); + DoFHandler dof_handler (triangulation); + dof_handler.distribute_dofs (fe); + deallog << "Number of dofs: " << dof_handler.n_dofs() << std::endl; + + ConstraintMatrix constraints; + DoFTools::make_hanging_node_constraints (dof_handler, constraints); + constraints.close (); + deallog << "Number of constraints: " << constraints.n_constraints() << std::endl; + + std::vector block_sizes(2); + block_sizes[0] = dof_handler.n_dofs()/3; + block_sizes[1] = dof_handler.n_dofs() - block_sizes[0]; + BlockVector b(block_sizes); + for (unsigned int i=0; i::const_iterator i=b.begin(); i!=b.end(); ++i) + deallog << *i << std::endl; + + // now also make sure that the elements in + // constrained rows are zero + for (unsigned int i=0; i (); + test<2> (); + test<3> (); + } + catch (std::exception &exc) + { + std::cerr << std::endl << std::endl + << "----------------------------------------------------" + << std::endl; + std::cerr << "Exception on processing: " << std::endl + << exc.what() << std::endl + << "Aborting!" << std::endl + << "----------------------------------------------------" + << std::endl; + + return 1; + } + catch (...) + { + std::cerr << std::endl << std::endl + << "----------------------------------------------------" + << std::endl; + std::cerr << "Unknown exception!" << std::endl + << "Aborting!" << std::endl + << "----------------------------------------------------" + << std::endl; + return 1; + }; +} diff --git a/tests/bits/dof_constraints_09.cc b/tests/bits/dof_constraints_09.cc new file mode 100644 index 0000000000..1e19a13c4c --- /dev/null +++ b/tests/bits/dof_constraints_09.cc @@ -0,0 +1,149 @@ +//---------------------------- dof_constraints_09.cc --------------------------- +// $Id$ +// Version: $Name$ +// +// Copyright (C) 2004 by the deal.II authors +// +// This file is subject to QPL and may not be distributed +// without copyright and license information. Please refer +// to the file deal.II/doc/license.html for the text and +// further information on this license. +// +//---------------------------- dof_constraints_09.cc --------------------------- + + +// simply check what happens when condensing block matrices. This test was +// written when I changed a few things in the algorithm. By simply looping +// over all entries of the sparse matrix, we also check that things went right +// during compression of the sparsity pattern. + +#include "../tests.h" +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include + + +template +void test () +{ + deallog << dim << "D" << std::endl; + + Triangulation triangulation; + GridGenerator::hyper_cube (triangulation); + + // refine once, then refine first cell to + // create hanging nodes + triangulation.refine_global (1); + triangulation.begin_active()->set_refine_flag (); + triangulation.execute_coarsening_and_refinement (); + deallog << "Number of cells: " << triangulation.n_active_cells() << std::endl; + + // set up a DoFHandler and compute hanging + // node constraints for a Q2 element + FE_Q fe(2); + DoFHandler dof_handler (triangulation); + dof_handler.distribute_dofs (fe); + deallog << "Number of dofs: " << dof_handler.n_dofs() << std::endl; + + ConstraintMatrix constraints; + DoFTools::make_hanging_node_constraints (dof_handler, constraints); + constraints.close (); + deallog << "Number of constraints: " << constraints.n_constraints() << std::endl; + + // then set up a sparsity pattern and a + // matrix on top of it + std::vector block_sizes(2); + block_sizes[0] = dof_handler.n_dofs()/3; + block_sizes[1] = dof_handler.n_dofs() - block_sizes[0]; + + BlockSparsityPattern sparsity(2,2); + for (unsigned int i=0; i<2; ++i) + for (unsigned int j=0; j<2; ++j) + sparsity.block(i,j).reinit (block_sizes[i], block_sizes[j], + dof_handler.max_couplings_between_dofs()); + sparsity.collect_sizes(); + + DoFTools::make_sparsity_pattern (dof_handler, sparsity); + constraints.condense (sparsity); + BlockSparseMatrix A(sparsity); + + // then fill the matrix by setting up + // bogus matrix entries + std::vector local_dofs (fe.dofs_per_cell); + FullMatrix local_matrix (fe.dofs_per_cell, fe.dofs_per_cell); + for (typename DoFHandler::active_cell_iterator + cell = dof_handler.begin_active(); + cell != dof_handler.end(); ++cell) + { + cell->get_dof_indices (local_dofs); + local_matrix.clear (); + for (unsigned int i=0; i::const_iterator i=A.begin(); i!=A.end(); ++i) + deallog << i->row() << ' ' << i->column() << ' ' << i->value() + << std::endl; +} + + + +int main () +{ + std::ofstream logfile("dof_constraints_09.output"); + deallog.attach(logfile); + deallog.depth_console(0); + + try + { + test<1> (); + test<2> (); + test<3> (); + } + catch (std::exception &exc) + { + std::cerr << std::endl << std::endl + << "----------------------------------------------------" + << std::endl; + std::cerr << "Exception on processing: " << std::endl + << exc.what() << std::endl + << "Aborting!" << std::endl + << "----------------------------------------------------" + << std::endl; + + return 1; + } + catch (...) + { + std::cerr << std::endl << std::endl + << "----------------------------------------------------" + << std::endl; + std::cerr << "Unknown exception!" << std::endl + << "Aborting!" << std::endl + << "----------------------------------------------------" + << std::endl; + return 1; + }; +}