From e1af04c876b618547ba2ea1642a649d4ba7c3cfa Mon Sep 17 00:00:00 2001 From: Wolfgang Bangerth Date: Mon, 6 Apr 1998 17:32:08 +0000 Subject: [PATCH] Bug fix and clean-up. git-svn-id: https://svn.dealii.org/trunk@148 0785d39b-7218-0410-832d-ea1e28bc413d --- deal.II/deal.II/source/numerics/base.cc | 28 +++++++++++-------------- 1 file changed, 12 insertions(+), 16 deletions(-) diff --git a/deal.II/deal.II/source/numerics/base.cc b/deal.II/deal.II/source/numerics/base.cc index bae1b0ee03..69e88f9bfb 100644 --- a/deal.II/deal.II/source/numerics/base.cc +++ b/deal.II/deal.II/source/numerics/base.cc @@ -13,7 +13,7 @@ #include #include - +#include @@ -110,17 +110,18 @@ void ProblemBase::assemble (const Equation &equation, } while ((++assembler).state() == valid); + // condense system matrix in-place + constraints.condense (system_matrix); + + // condense right hand side in-place + constraints.condense (right_hand_side); + // apply Dirichlet bc as described // in the docs apply_dirichlet_bc (system_matrix, solution, right_hand_side, dirichlet_bc, fe); - // condense system matrix in-place - constraints.condense (system_matrix); - - // condense right hand side in-place - constraints.condense (right_hand_side); }; @@ -223,12 +224,6 @@ void ProblemBase::integrate_difference (const Function &exact_sol for (unsigned int j=0; j