solver.hpp

/******************************************************************************
 * Copyright (C) Siarhei Uzunbajakau, 2023.
 *
 * This program is free software. You can use, modify, and redistribute it under
 * the terms of the GNU Lesser General Public License as published by the Free
 * Software Foundation, either version 3 or (at your option) any later version.
 * This program is distributed without any warranty.
 *
 * Refer to COPYING.LESSER for more details.
 ******************************************************************************/
 
#ifndef SolverMMSVTII_H__
#define SolverMMSVTII_H__
 
#include <deal.II/base/function.h>
#include <deal.II/base/tensor_function.h>
#include <deal.II/base/vectorization.h>
 
#include <deal.II/lac/precondition.h>
#include <deal.II/lac/solver_cg.h>
#include <deal.II/lac/solver_control.h>
#include <deal.II/lac/sparse_direct.h>
 
#include <deal.II/grid/grid_in.h>
#include <deal.II/grid/grid_tools.h>
#include <deal.II/grid/manifold_lib.h>
 
#include <fstream>
#include <string>
 
#include "exact_solution.hpp"
#include "settings.hpp"
#include "static_scalar_solver.hpp"
#include "static_vector_solver_ii.hpp"
 
using namespace StaticScalarSolver;
using namespace StaticVectorSolver;
 
class SolverMMSVTII_T
  : public SettingsMMSVTII
  , public Solver<2, 0>
{
public:
  SolverMMSVTII_T() = delete;
 
  SolverMMSVTII_T(unsigned int p,
                  unsigned int mapping_degree,
                  unsigned int r,
                  std::string fname)
    : Solver<2, 0>(p,
                   mapping_degree,
                   3, // The right-hand side is volume free-current density.
                   fname,
                   &exact_solution,
                   false, // Is axisymmetric.
                   true,  // Is vector potential.
                   SettingsMMSVTII::print_time_tables,
                   SettingsMMSVTII::project_exact_solution,
                   true)
    , fname(fname)
    , r(r)
  {
    Solver<2, 0>::run();
  }
 
  ~SolverMMSVTII_T() = default;
 
private:
  const std::string fname;
 
  const unsigned int r;
 
  virtual void make_mesh() override final;
  virtual void fill_dirichlet_stack() override final;
  virtual void solve() override final;
 
  const SphericalManifold<2> sphere;
  ExactSolutionMMSVTII_T exact_solution;
  DirichletBC_MMSVTII_T dirichlet_bc;
};
 
class SolverMMSVTII_A
  : public SettingsMMSVTII
  , public Solver2<2, 2>
{
public:
  SolverMMSVTII_A() = delete;
  SolverMMSVTII_A(unsigned int p,
                  unsigned int mapping_degree,
                  const Triangulation<2>& triangulation_T,
                  const DoFHandler<2>& dof_handler_T,
                  const Vector<double>& solution_T,
                  unsigned int r,
                  std::string fname)
    : Solver2<2, 2>(p,
                    mapping_degree,
                    triangulation_T,
                    dof_handler_T,
                    solution_T,
                    0,
                    0.0,
                    fname,
                    nullptr,
                    SettingsMMSVTII::print_time_tables,
                    SettingsMMSVTII::project_exact_solution,
                    true)
    , fname(fname)
    , r(r)
  {
    Solver2<2, 2>::run();
  }
 
  ~SolverMMSVTII_A() = default;
 
private:
  const std::string fname;
 
  const unsigned int r;
 
  DirichletBC_MMSVTII_A dirichlet_bc;
  // Solver2 reuses triangulations of other solvers.
  // No make_mesh() this time around.
  virtual void fill_dirichlet_stack() override final;
  virtual void solve() override final;
};
 
#endif