Skip to content
Snippets Groups Projects
Commit bb7614ca authored by Max Kahnt's avatar Max Kahnt
Browse files

Refactor GSStepTest.

parent 0ed01bb0
Branches
No related tags found
No related merge requests found
Pipeline #
......@@ -71,66 +71,44 @@ struct GSTestSuite
using Vector = typename Problem::Vector;
Analyser<Vector> analyser(p.u_ex, p.energyNorm, solveTol);
{
Vector u_copy = p.u;
Vector rhs_copy = p.rhs;
using GSStep = BlockGSStep<Matrix, Vector>;
GSStep gsStep;
gsStep.setProblem(p.A, u_copy, rhs_copy);
typename GSStep::BitVector ignore(u_copy.size(), false);
gsStep.ignoreNodes_ = &ignore;
::LoopSolver<typename Problem::Vector> solver(
&gsStep, maxIterations, stepTol, &p.energyNorm, verbosity,
relativeErrors);
solver.check();
solver.preprocess();
solver.solve();
using LoopSolver = ::LoopSolver<Vector>;
using Step = LinearIterationStep<Matrix, Vector>;
passed = passed and analyser.analyse(u_copy, "BlockGS");
}
{
auto test = [&](Step* step, std::string name) {
Vector u_copy = p.u;
Vector rhs_copy = p.rhs;
using GSStep = SemiDefiniteBlockGSStep<Matrix, Vector>;
GSStep gsStep;
gsStep.setProblem(p.A, u_copy, rhs_copy);
typename GSStep::BitVector ignore(u_copy.size(), false);
gsStep.ignoreNodes_ = &ignore;
step->setProblem(p.A, u_copy, rhs_copy);
typename Step::BitVector ignore(u_copy.size(), false);
step->ignoreNodes_ = &ignore;
::LoopSolver<typename Problem::Vector> solver(
&gsStep, maxIterations, stepTol, &p.energyNorm, verbosity,
relativeErrors);
LoopSolver solver(step, maxIterations, stepTol,
&p.energyNorm, verbosity, relativeErrors);
solver.check();
solver.preprocess();
solver.solve();
passed = passed and analyser.analyse(u_copy, "SemiDefiniteBlockGS");
}
{
Vector u_copy = p.u;
Vector rhs_copy = p.rhs;
using GSStep = SemiDefiniteBlockGSStep<Matrix, Vector>;
Dune::ParameterTree config;
config["regularize_diagonal"] = "true";
passed = passed and analyser.analyse(u_copy, name);
};
GSStep gsStep;
gsStep.setProblem(p.A, u_copy, rhs_copy);
typename GSStep::BitVector ignore(u_copy.size(), false);
gsStep.ignoreNodes_ = &ignore;
{
BlockGSStep<Matrix, Vector> gsStep;
test(&gsStep, "BlockGS");
}
::LoopSolver<typename Problem::Vector> solver(
&gsStep, maxIterations, stepTol, &p.energyNorm, verbosity,
relativeErrors);
solver.check();
solver.preprocess();
solver.solve();
for(auto reg : {false, true}) {
for(auto type : {"direct", "ldlt", "cg"}) {
Dune::ParameterTree config;
config["type"] = type;
config["regularize_diagonal"] = reg ? "1" : "0";
passed = passed and analyser.analyse(u_copy, "SemiDefiniteBlockGS regularized");
SemiDefiniteBlockGSStep<Matrix, Vector> gsStep(config);
test(&gsStep, Dune::formatString("SemiDefiniteBlockGS %s %s",
type, reg ? "regularized" : ""));
}
}
return passed;
}
};
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment