solver_BiCGStab_Cmplx.h

Go to the documentation of this file.

 
#ifndef SOLVER_BICGSTAB_CMPLX_INCLUDED
#define SOLVER_BICGSTAB_CMPLX_INCLUDED
 
#include "solver.h"
 
#include "IO/bridgeIO.h"
using Bridge::vout;
 
 
class Solver_BiCGStab_Cmplx : public Solver
{
 public:
  static const std::string class_name;
 
 private:
  Bridge::VerboseLevel m_vl;
 
  Fopr *m_fopr;
 
  int m_Niter, m_Nrestart;
  double m_Stop_cond;
  bool m_use_init_guess;
 
  double m_Omega_tolerance;
 
  //- working area
  dcomplex m_rho_prev, m_alpha_prev, m_omega_prev;
  Field m_s, m_r, m_x, m_rh, m_p, m_v, m_t;
 
  int m_Nrestart_count;
  int m_Nconv_count;
 
 public:
 
  Solver_BiCGStab_Cmplx(Fopr *fopr)
    : m_vl(CommonParameters::Vlevel()),
    m_fopr(fopr)
  {
    m_use_init_guess = false;
    //- default value of m_Omega_tolerance = 0.7 for BiCGStab
    m_Omega_tolerance = 0.7;
    m_Nrestart_count  = 0;
    m_Nconv_count     = 0;
  }
 
  Solver_BiCGStab_Cmplx(Fopr *fopr, const Parameters& params)
    : m_vl(CommonParameters::Vlevel()),
    m_fopr(fopr)
  {
    m_use_init_guess = false;
    //- default value of m_Omega_tolerance = 0.7 for BiCGStab
    m_Omega_tolerance = 0.7;
    m_Nrestart_count  = 0;
    m_Nconv_count     = 0;
 
    set_parameters(params);
  }
 
  ~Solver_BiCGStab_Cmplx() {}
 
  void set_parameters(const Parameters& params);
 
  void set_parameters(const int Niter, const int Nrestart, const double Stop_cond);
  DEPRECATED
  void set_parameters(const int Niter, const int Nrestart, const double Stop_cond, const bool use_init_guess);
  DEPRECATED
  void set_parameters_BiCGStab_series(const double Omega_tolerance);
 
  void set_parameters(const int Niter, const int Nrestart, const double Stop_cond, const bool use_init_guess, const double Omega_tolerance);
 
  void get_parameters(Parameters& params) const;
 
  void solve(Field& solution, const Field& source, int& Nconv, double& diff);
 
  Fopr *get_fopr() { return m_fopr; }
 
  double flop_count();
 
 private:
  void reset_field(const Field&);
 
  void solve_init(const Field&, double&);
  void solve_step(double&);
 
#ifdef USE_FACTORY
 private:
  static Solver *create_object(Fopr *fopr)
  {
    return new Solver_BiCGStab_Cmplx(fopr);
  }
 
  static Solver *create_object_with_params(Fopr *fopr, const Parameters& params)
  {
    return new Solver_BiCGStab_Cmplx(fopr, params);
  }
 
 public:
  static bool register_factory()
  {
    bool init = true;
    init &= Solver::Factory::Register("BiCGStab_Cmplx", create_object);
    init &= Solver::Factory_params::Register("BiCGStab_Cmplx", create_object_with_params);
    return init;
  }
#endif
};
#endif